- 在https://stackoverflow.com/a/33584292/4606130中查看 @Shape 的策略。
服务器.R:
library(shiny)
source('sub_server_functions.R')
function(input, output, session) {
subServerFunction1(input, output, session)
subServerFunction2(input, output, session)
subServerFunction3(input, output, session)
}
其他想法是:
将你的数据调用和常量放在一个global.R中,你的 ui 和 server.R 文件都可以共享它。看看http://shiny.rstudio.com/articles/scoping.html
看看Shiny的新模块方法。我仍在处理这个问题,但看起来很有希望合理化。请参阅http://shiny.rstudio.com/articles/modules.html
在此之后,flex 仪表板文件的示例.Rmd
看起来很薄!
---
title: "screenR"
output: flexdashboard::flex_dashboard
runtime: shiny
---
```{r}
# include the module
source("screenrdata.R")
```
Charts
======
### Screening Scatter
```{r}
# call the module
xyUI("id1")
callModule(screenchart, "id1")
```