В моем приложении Shiny у меня есть selectInput с именем bob в моем пользовательском интерфейсе с вариантами «A», «B», «C».
В верхней части моего сервера (прежде всего) у меня есть
observe({
bob_value <- reactive({
if (input$bob == "A")
{bob_value <- "A"
} else if (input$bob == "B")
{bob_value <- "B"
} else if (input$bob == "C")
{bob_value <- "C"}
bob_value
})
.............................
})
Где точки обозначают около десяти миллионов и шесть строк кода.
Итак, десять миллионов шесть строк кода в основном упоминают несколько больших файлов функций, одним из аргументов которых является alice. Я хочу, чтобы Алиса реагировала на bob_value, чтобы я мог изменить ввод $ bob в пользовательском интерфейсе и увидеть изменение вывода десяти миллионов шести строк кода. Итак, я планировал установить для всех алисов bob_value (), но прежде чем я смог это сделать, я получил сообщение об ошибке:
Ошибка в ==: сравнение (1) возможно только для атомарных и списковых типов.
Буду признателен за помощь.