выберите вкладку в R блестящий

Question

Я делаю R блестящий проект и в ui.RI есть такой код:

ui.R

    tabPanel("Ctree",  fluidPage(
  sidebarLayout(
    selectizeInput("ctreeinput","Zvolte atributy k cielovemu atributu LoanAmount",choices=colnames(stats_people),multiple=TRUE),
    mainPanel(tableOutput("ctree1"))
    )
 ))

server.R

output$ctree1<- renderTable({  
set.seed(123)
library(party)

myFormula = LoanAmount_1 ~ input$ctreeinput

ctree = ctree(myFormula, data=train.ctree)
table(predict(ctree), train.ctree$LoanAmount_1)

ctreePred = predict(ctree, newdata = test.ctree)
table(ctreePred, test.ctree$LoanAmount_1)
})

На сервере.У меня есть myFormula, где я хочу создать что-то вроде этого:

myFormula = LoanAmount ~ ApplicantIncome+CoapplicantIncome+Dependents+Gender+Married

... но оно должно быть создано пользователем.Я хочу использовать selectizeInput.Это решение, которое я вставил сюда, не работает, говорит RStudio, что ОШИБКА: объект «вход» не найден.Что я должен сделать, чтобы работать мой код?Спасибо!

Answer 1

В server.R перед определением myFormula вам необходимо определить объект (например, фрейм данных) с именем input вместе с подобъектом (например, столбцом) с именем ctreeinput.