我对闪亮还是很陌生（玩了大约一个星期）。我正在尝试创建一个应用程序，该应用程序接受并输入制表符分隔的文本文件并执行几个探索性功能。在这种情况下，我将展示该应用程序的一个非常简化的版本，只是为了突出我在特定情况下想要做的事情：

问题：

如果您尝试使用示例数据（或任何相同格式的数据）的应用程序，您会注意到该应用程序有效地执行了默认汇总表（如果selectInput="summarize"，那么output$sumfile)，但是当您尝试选择“探索”时，前一个表被删除从 mainPanel 中输出完整文件 ( selectInput="explore",then output$gridfile) 在它selectInput="summarize"仍然被选中的地方。

如果您重新选择“总结”，则会excelOutput("sumfile")在主面板上重复。

我的目标很简单：

excelOutput("sumfile")当selectInput="summarize"只有和

excelOutput("gridfile")selectInput="explore"仅当

在 mainPanel 上没有放置问题或重复

到目前为止，我已经尝试过：

或者

控制主面板上显示的内容，但存在放置和重复问题。

样本数据：

闪亮的应用程序（app.R）：

excelTable()ExcelR 包中的查看器窗格中没有显示任何输出。我已经更新了所有依赖包。可能是什么问题呢？

sessionInfo() R 版本 3.5.1 (2018-07-02) 平台：x86_64-w64-mingw32/x64 (64-bit) 运行于：Windows >= 8 x64 (build 9200)

矩阵产品：默认

语言环境： 1 LC_COLLATE=English_United States.1252 LC_CTYPE=English_United States.1252 LC_MONETARY=English_United States.1252 LC_NUMERIC=C LC_TIME=English_United States.1252

附加的基础包： 1 stats graphics grDevices utils datasets methods base

其他附加包： 1 jsonlite_1.6 htmlwidgets_1.5.1 excelR_0.3.1 covr_3.3.2 testthat_2.1.1 shiny_1.4.0

通过命名空间加载（且未附加）： 1 Rcpp_1.0.0 pillar_1.3.1 compiler_3.5.1 later_1.0.0 plyr_1.8.4 tools_3.5.1 digest_0.6.18 tibble_2.0.1 gtable_0.2.0 lattice_0.20-35 pkgconfig_2.0.2 rlang_0.4.1 Matrix_1 .2-14
[14] rex_1.1.2 rstudioapi_0.9.0 yaml_2.2.0 fastmap_1.0.1 dplyr_0.8.0.1 grid_3.5.1 tidyselect_0.2.5 glue_1.3.0 R6_2.4.0 ggplot2_3.1.0 purrr_0.3.1 magrittr_127.5 scales_1.0.0
[ ] promises_1.1.0 htmltools_0.4.0 assertthat_0.2.0 mime_0.6 colorspace_1.4-0 xtable_1.8-3 httpuv_1.5.2 bs4Dash_0.3.0 lazyeval_0.2.1 munsell_0.5.0 crayon_1.3.4

我正在使用 ExcelR 和 Shiny。我似乎无法让桌子比 13 行更大。

这是示例代码：

分页似乎没有效果，如果我打开全屏，其余的行都会被渲染，但我看不到搜索栏，表格和导航栏之间的填充消失了。

我正在运行 R 3.6.0

我试图消除此表和浏览器窗口左侧之间的空间，但是当我这样做时，它会弄乱导航栏链接和标题的间距。

如何在不更改 navbar/ui/li 元素的填充/边距的情况下删除 excelR 表上的填充/边距？

如何从 excelR 包中下载表格？我想使用 excelR 包的原因是用户可以直接输入值，但如果要添加更多而不是几行，我想给他们下载列表的选项。

请参阅下面的最低可重现代码。运行以下代码并单击下载按钮时，它给了我一条错误消息Warning: Error in as.data.frame.default: cannot coerce class ‘c("jexcel", "htmlwidget")’ to a data.frame [No stack trace available]

我有以下代码使用 excelR 输出 mtcars 表。我想让列名在垂直位置而不是水平位置，我该怎么做？它需要在 excelR 包中，因为用户需要更新一些信息。谢谢！

编辑：

非常感谢 gdevaux 的以下回答，他向我展示了它可以在他的电脑上运行。但不知何故，我们无法弄清楚它在我的 Mac 或 Windows 上不起作用的问题，尝试了 safari 和 chrome，R 版本已更新并尝试从外部浏览器打开。

其他人可以运行下面的代码以查看是否有效，如果有人知道它对我不起作用的原因可能是什么？

我在 R 中制作了一个 Shiny 应用程序，向用户显示类似 Excel 的网格。该excelR包是 JS 包JSpreadsheet的包装器。这个包自动将行号放在最左边的列中。我不想要他们。

通过深入研究 JavaScript，我终于能够弄清楚如何使用 actionButton 通过发送 JS 命令来删除行号：

但我真的很想让表格在没有索引列（行号）的情况下自动呈现。我尝试使用观察事件（以及许多其他东西）来监视 中的变化input$table，但是在编辑表之前似乎没有创建输入。