ShinyR:在数据库中插入用户输入以供进一步使用
我正在使用Shiny开发一个小应用程序 我现在的问题是将来自用户(反应式环境)的输入插入到现有的数据帧中。具体来说,我无法将输入类型从closure转换为double(请参见下面的错误消息) 我已经尝试了几种方法,并在谷歌上搜索了这个问题,但没有找到任何解决方案 非常感谢 下面是代码的简化版本:ShinyR:在数据库中插入用户输入以供进一步使用,r,database,input,shiny,R,Database,Input,Shiny,我正在使用Shiny开发一个小应用程序 我现在的问题是将来自用户(反应式环境)的输入插入到现有的数据帧中。具体来说,我无法将输入类型从closure转换为double(请参见下面的错误消息) 我已经尝试了几种方法,并在谷歌上搜索了这个问题,但没有找到任何解决方案 非常感谢 下面是代码的简化版本: library(shiny) ui <- fluidPage( navbarPage(title = "App Title", tabPanel("Panel Header"
library(shiny)
ui <- fluidPage(
navbarPage(title = "App Title",
tabPanel("Panel Header",
titlePanel("Panel Title"),
sidebarLayout(
sidebarPanel("SideBar"),
mainPanel(
numericInput("User_1","Input1", value = 1, min=0),
numericInput("User_2","Input2", value = 0.3, min=0),
actionButton(inputId = "UserValid",label = "Click me"),
dataTableOutput("df")
)#end mainPanel
)#end sidebarLayout
)#end tabPanel
)#end Navbarpage
)#end ui
server <- function(input, output) {
DB1 <- read.csv2("~/FilePathway/DB1.csv", row.names = 1, sep=",", dec=".")
UserData <- eventReactive(input$UserValid,{
data.frame(U_1 = input$User_1,
U_2 = input$User_2
)})
DB1[66,1:2] <- eventReactive(input$UserValid,{
UserData()
})
}#end server
shinyApp(ui = ui, server = server)
库(闪亮)
ui如果您有相同的问题,请转到本主题以获得部分(至少目前)解决方案:
如果您有相同的问题,请转到本主题以获得部分(至少目前)解决方案:
Warning: Error in <-: incompatible types (from closure to double) in subassignment type fix
52: [<-.data.frame
50: server [#27]
Error in x[[jj]][iseq] <- vjj :
incompatible types (from closure to double) in subassignment type fix