library(curl) library(shiny) options(warn=-1) #options(shiny.port = 1009) #options(shiny.host = readLines(curl("http://myexternalip.com/raw")))