ShinyR: вставьте пользовательские данные в базу данных для дальнейшего использования - PullRequest
Новая
       33

ShinyR: вставьте пользовательские данные в базу данных для дальнейшего использования

0 голосов
/ 16 марта 2019

Я использую Shiny для разработки небольшого приложения.

Моя задача на сегодня - вставить входные данные пользователя (реактивная среда) в существующий фрейм данных.В частности, я не могу преобразовать тип входных данных из замыкания в двойной (см. Сообщение об ошибке ниже).

Я уже пробовал несколько подходов и погуглил проблему, но не нашел решения.

Большое спасибо,

Вот упрощенная версия кода: 

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)

Вот сообщение об ошибке 

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

1 Ответ

0 голосов
/ 17 марта 2019

Если у вас возникла та же проблема, перейдите к этой теме для частичного (по крайней мере, пока) решения: ShinyR: неожиданный результат при экспорте входных данных

...