我想用renderDataTable
绘制一些内容。多数民众赞成我如何将其发送到ui.R
output$myTable <- renderDataTable(myTableSelection())
这是ui.R
收到它的方式:
... tabPanel("Title", value = 4, dataTableOutput("myTable ")))), ...
在呈现表之前,需要对数据进行一些预处理。 我一直收到这个错误消息:
.func()中的错误:object&#39; input&#39;找不到
为了缩小错误范围,我一直在评论处理dataframe
的行,然后再将其发送到renderDataTable
。
我把它缩小到这些界限:
someName <- eventReactive(input$someInputA, {
if( (as.integer(input$someInputB) == 2) ) {
return(someDf[someDf$someColumn %in% input$someInputA ,])
} else {
print("Whatever")
}
})
当我使用ui.R
引用input$whatever
中的变量时,我的代码中的其他任何位置都可以使用,但不在此处。
当我使用不会执行的代码打印两个输入文档时
observe({
print(input$someInputA)
print(input$someInputB)
})
打印得当。
我甚至尝试将input$...
分配给global.R
中的某些变量,但这两者都没有帮助。任何想法为什么?!