当我尝试创建一个Shiny应用程序时,但是当我添加并尝试使用复选框时,我的代码失败了,点击"运行App"在RStudio。它与我阅读我的复选框的方式有关,但我无法弄清楚是什么。我尝试将复选框值更改为列表,添加" session"作为我的server.R文件中的参数,基于类似的StackOverflow问题,但没有任何工作。
$.shinyoutput
中的错误(输出,值): 不允许从shinyoutput对象中读取对象。
我的ui.r文件:
<pre>
<code>
shinyUI(navbarPage('CERELAS AAHHHHHH',
tabPanel('Scatter', titlePanel('cereal'),
sidebarLayout(sidebarPanel(
fluidPage(
checkboxGroupInput("checkGroup", label = h3("Checkbox group"),
choices = list("Nabisco" = 'N',
"American Home Food Products" = 'A',
"General Mills" = 'G',
"Kelloggs" = 'K',
"Post" = 'P',
"Quaker Oats" = 'Q',
"Ralston Purina" = 'R'
),
selected = 'N'),
hr(),
fluidRow(column(3, verbatimTextOutput("value")))
)
),
mainPanel(
#give your plot a descriptive name
plotlyOutput("scatter")
)
)
)
))
</code>
</pre>
我的server.R文件:
<pre>
<code>
shinyServer(function(input, output, session) {
output$value <- renderText({ input$checkGroup })
print(output$value)
# Render a plotly object that returns your map
output$scatter <- renderPlotly({
df <- read.delim(file = 'data/cereal.tsv', sep = '\t', header = TRUE)
#return some plot
})
})
</code>
</pre>