Question

我已经开始学习Shiny Interactive文档而且不是程序员所以请原谅我的无知这是基于rmarkdown版本2网站＆＃39;高级＆＃39;主题页面。我有RStudio版本0.98.1028 我想在闪亮的文档中显示head向量a或b。这就是我的所作所为：

```{r two, echo = FALSE}

a <- 1:10
b <- 13:20
a
b
selectInput("dataset2", "Choose Dataset:", c('a', 'b'))

activeDataset2 <- reactive({
  get(input$dataset2)
})

renderTable({
  head(activeDataset2(), 5)
})

```

点击Run Document后，我收到错误no applicable method for 'xtable' applied to an object of class "c('integer', 'numeric')" 在网站上的示例中，参数pos用于查找数据集。在这种情况下，我不知道如何使用它。请帮忙。

Answer 1

renderTable使用xtable生成表格：

a <- 1:10
> library(xtable)
> xtable(a)
Error in UseMethod("xtable") : 
  no applicable method for 'xtable' applied to an object of class "c('integer', 'numeric')"

所以这里的问题是xtable需要一个传递给它的对象，并定义了一个xtable方法：

> methods(xtable)
 [1] xtable.anova*           xtable.aov*             xtable.aovlist*        
 [4] xtable.coxph*           xtable.data.frame*      xtable.glm*            
 [7] xtable.lm*              xtable.matrix*          xtable.prcomp*         
[10] xtable.summary.aov*     xtable.summary.aovlist* xtable.summary.glm*    
[13] xtable.summary.lm*      xtable.summary.prcomp*  xtable.table*          
[16] xtable.ts*              xtable.zoo*

您可以将输出更改为data.frame

activeDataset2 <- reactive({
  out <- get(input$dataset2)
  `names<-`(data.frame(out), input$dataset2)
})

或者您可以为类"c('integer', 'numeric')"

的对象编写适当的xtable方法

如何在RStudio中查找用于Shiny Interactive Document的多个数据集？

1 个答案: