2014-09-19 95 views

回答

1

不看源代碼。然而,你可以定義自己的函數:

runShinyBuilder <- function (...) { 
    sb_path <- system.file(package = "ShinyBuilder") 
    dir_mode <- as.numeric(as.character(file.info(paste0(sb_path, 
                 "/dashboards"))$mode)) 
    if (dir_mode < 755) 
    Sys.chmod(sbd_path, mode = "0755") 
    shiny::runApp(sb_path, ...) 
} 

現在呼籲

runShinyBuilder(port = 5678) 

應該打開它在端口5678例如。