R Shinny-如何将tableOutput用作vector或data.frame

问候并感谢您的帮助

我无法在ui.R中使用data.frame（在server.R上创建）。 原因很明显：

tableOutput（）

既不是data.frame，也不是向量。 我之所以需要这样做，是因为

selectInput（“ops”，…）

从server.R接收该表，因为它是应用于那里的输入的函数的结果。 函数很长，所以我刚刚制作了这个

data.frame（c（1,2），c（3,4），c（5,6））

。无论如何，这一点是相同的

问题: 即使我知道为什么它不起作用，我也不能使它起作用。 我要寻找的是一种以类似表格的方式从

tableOutput（）

获取信息的方法，以便在

selectInput（choices=…）

下拉列表中使用它

如果运行此代码，您会注意到

selectInput（）

只是显示选项：“name”、“id”、“class”。 我想让它显示：1，2。或者3，4。或者5，6

多谢各位

library(shiny)
shinyApp(
    ui = fluidPage(
        sidebarLayout(
            sidebarPanel({p("")}),
            mainPanel({
                tabPanel("Asignar tipo",
                    selectInput(
                        "ops",
                        "Operations",
                        tableOutput("impsTabla"),
                        multiple=TRUE,
                        selectize=TRUE
                    ),
                    br(),
                    tableOutput("impsTabla")
                )
            })
        )
    ), 
    server = function(input, output){
        output$impsTabla<- renderTable(
            data.frame(c(1,2),c(3,4),c(5,6))
        )
    }
)

库（闪亮）
shinyApp(
ui=fluidPage(
侧边栏布局(
侧边栏面板（{p（“”）}），
主面板({
选项卡面板（“Asignar tipo”，
选择输入(
“行动”，
“行动”，
表格输出（“impsTabla”），
倍数=真，
selectize=TRUE
),
br（），
表格输出（“impsTabla”）
)
})
)
), 
服务器=功能（输入、输出）{
输出$IMPSTABLAI如果有必要根据用户的输入改变
tabPanel（）
的输入，请参见？renderUI（）和？uiOutput。但是
output$impsTabla
是常量，因此您可以直接将这些值输入
tabPanel（）
而无需求助于反应式UI。我使用
renderUI（）
和
uiOutput来实现它（）
（谢谢！）但是当我尝试直接使用
output$impsTabla
到
selecInput（choices=…）
中时，我得到这样一条消息：lappy中的错误（obj，function（val）{:object'output'找不到，这是因为输出对于ui不可见，仅对于服务器可见……有用的文章：