Как исправить «выбор объекта» не найден », когда я определил его в пользовательском интерфейсе - PullRequest
Новая
       15

Как исправить «выбор объекта» не найден », когда я определил его в пользовательском интерфейсе

0 голосов
/ 29 апреля 2019

Я новичок в написании блестящих приложений.Я пытаюсь создать приложение в стиле запросов, которое берет ответы из серии вопросов и использует их для сужения данных, чтобы дать им наилучшее соответствие их предпочтениям.Вроде как викторина BuzzFeed.Мое приложение не будет работать для меня прямо сейчас, потому что оно говорит мне, что оно не может найти "выбор" объекта, который написан несколько раз в моем коде пользовательского интерфейса.Проблема в том, что я не могу понять, почему, потому что я определяю его каждый раз, когда использую его. Что я делаю не так?

    UI:
    radioButtons("q1", label = h3("how many people are in your 
    household?"),
                       choices = list("1 to 2" = 1, "3 to 5" = 2, "6 to 
     7" = 3, "8" = 4, "9 or more" = 5), 
                       selected = 1),

    Server: 
    server<-function(input, output) {
      q1 <- reactive({
        if (input$q1 == "1 to 2"){
          q1dat <- dat_full$Seats < 6
        } else if (input$q1 == "3 to 5") {
          q1dat <- dat_full$Seats > 2 & dat_full$Seats < 6
        } else if (input$q1 == " 6 to 7") {
          q1dat <- dat_full$Seats > 5 
        } else if (input$q1 == "8"){
          q1dat <- dat_full$Seats > 7 
        } else if (input$q1 == "9 or more") {
          q1dat <- dat_full$Seats = 9
      }
    })
...