我在闪亮的仪表板中leaflet
带有点的地图。单击某个点,您将从主 dfbotsad.final
的一列和来自 SAME df 的数据子集中获得文本字符串,这些文本应出现在地图下方的表格中。
所以: 1.在本地,文本和表格都显示正常。 2.在通过 shinyapps.io 的生产中,文本看起来不错,但表格不起作用。它会产生错误。 3. dfbotsad.final
在项目的目录中,对于textOutput
(工作(和tableOutput
(仅在本地工作(是相同的。
部署错误在哪里? 有一部分server.R
与tableOutput
有关。ui.R
在这里。
# Make a table with ecosystem services
output$table <- renderTable({
if (is.null(data_of_click$clickedMarker)) {
return(NULL)
}
return(
subset(botsad.final %>%
dplyr::select(7:12, 14),
id == data_of_click$clickedMarker$id
)
)
}, na = '-', bordered = T)
您是否在日志中收到任何错误消息?我没有在 R 中使用过传单地图,但我已经部署了一些应用程序来 shinyapps.io。请原谅我可能没有帮助的答案。
我浏览了代码,但无法运行它(我想是因为我没有数据(。
我的猜测是,有两件事可能出错:
(1( 数据未复制到服务器。部署到 R 时,是否正在部署文件中的数据?
(2( 服务器上未读取数据。您是否正在全局读取数据。R文件什么的?
如果您确定数据在那里,请分享日志告诉您的内容。