值[[3L]] (Cond)中出错:未找到对象'opcije‘
值[[3L]] (Cond)中出错:未找到对象'opcije‘
提问于 2020-10-29 20:14:56
下面的代码正在以我想要的方式在离线会话中工作。
opcije <- ls()[sapply(ls(), function(x) class(get(x))) == 'data.frame']
ui <- fluidPage(
selectInput("language", "Zadatak 3 - No-", choices = opcije),
textOutput("tekstZadatka"),
tableOutput("tabela")
)
server <- function(input, output, session) {
output$tekstZadatka <- renderText({'some text whatever'})
output$tabela <- renderTable({
dataset <<- get(input$language)
dataset
})
}
shinyApp(ui, server)
变量opcije是全局定义的char向量，用于从glob环境中获取n个数据帧中的一个。但是，在将此代码部署到服务器后，我得到的对象'opcije‘找不到：
我将非常感谢任何关于如何克服这个问题的建议。这里还有一个来自仪表板的日志。
回答 1
Stack Overflow用户
回答已采纳
发布于 2020-10-30 08:47:23
解决了。我一直遗漏的部分是，数据必须在服务器函数中加载，而不是在app.R.现在部署后，代码工作得很好。
server <- function(input, output, session) {
output$tekstZadatka <- renderText({'some text whatever'})
for (n in 1:5){
assign(paste("zadatak_", n, sep =''), read.csv(paste("Zadaci", paste("zadatak_",
n, ".csv", sep =''), sep ='/')))
}
output$tabela <- renderTable({
dataset <- get(input$language)
dataset
})
}页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/64598610
复制相关文章
相似问题
值[[3L]](Cond)中出错:缺少所需的包
R中的值[[3L]](Cond)中的错误是什么？
在发亮但在本地运行的值[[3L]](Cond)错误
值[[3L]] (Cond)中出错:在shinyapps上发布时禁用的多字节字符串
值[[3L]](Cond)错误:没有名为“plyr”的包
添加站长 进交流群
领取专属 10元无门槛券
AI混元助手 在线答疑
关注 腾讯云开发者公众号
洞察 腾讯核心技术
剖析业界实践案例
腾讯云开发者
