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

时间:2014-11-02 19:22:45

标签: r shiny

问候并感谢您的帮助,

我不能在ui.R中使用data.frame(在server.R上创建)。 原因很明显:tableOutput()不是data.frame,也不是vector。 我需要这样做,因为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))
        )
    }
)

0 个答案:

没有答案