Блестящая ошибка - интерактивность пользователя / ввод не работает

Всякий раз, когда я пытаюсь запустить интерактивное приложение (например, блестящий ввод в примечаниях к курсу), я получаю результат, аналогичный приведенному ниже. Я прослушиваю http://... сразу после ввода runApp(). Я получаю сообщение об ошибке, как только открываю страницу URL. Я пытался удалить и переустановить как shining, так и rtools. Единственная разница, которую я увидел в результате своих действий, заключается в том, что когда я запускаю приложение, где раньше оно открывало окно браузера в хроме для приложения, теперь оно открывает окно R, которое немедленно закрывается.

> runApp()

Listening on http://127.0.0.1:5066
ERROR: [on_request_read] connection reset by peer

ui.R

library(shiny)
shinyUI(pageWithSidebar(
        headerPanel("Illustrating inputs"),
        sidebarPanel(
                numericInput('id1', 'Numeric input, labeled id1', 0, min = 0, max = 10, step = 1),
                checkboxGroupInput("id2", "Checkbox",
                                   c("Value 1" = "1",
                                     "Value 2" = "2",
                                     "Value 3" = "3")),
                dateInput("date", "Date:")  
        ),
        mainPanel(
                h3('Illustrating outputs'),
                h4('You entered'),
                verbatimTextOutput("oid1"),
                h4('You entered'),
                verbatimTextOutput("oid2"),
                h4('You entered'),
                verbatimTextOutput("odate")
        )
))

сервер.R

library(shiny)
shinyServer(
        function(input, output) {
                output$oid1 <- renderPrint({input$id1})
                output$oid2 <- renderPrint({input$id2})
                output$odate <- renderPrint({input$date})
        }
)

Я использую Windows 7 и Google Chrome в качестве браузера.

sessionInfo() возвращает следующее:

R version 3.1.1 (2014-07-10)
Platform: x86_64-w64-mingw32/x64 (64-bit)

locale:
[1] LC_COLLATE=English_United States.1252  LC_CTYPE=English_United States.1252   
[3] LC_MONETARY=English_United States.1252 LC_NUMERIC=C                          
[5] LC_TIME=English_United States.1252    

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] shiny_0.10.1

loaded via a namespace (and not attached):
[1] bitops_1.0-6    caTools_1.17    digest_0.6.4    htmltools_0.2.4 httpuv_1.3.0   
[6] Rcpp_0.11.2     RJSONIO_1.3-0   tools_3.1.1     xtable_

Вывод Sys.info() выглядит следующим образом [с удаленными учетными данными пользователя]:

                 sysname                      release                      version 
               "Windows"                      "7 x64" "build 7601, Service Pack 1" 
                machine 
                "x86-64"

person Zigu    schedule 08.09.2014    source источник


Ответы (1)


У меня была такая же проблема. Это было связано с функцией в моем файле сервера:

  observe(input$file1, {
       updateTabItems(session, "tabs", "upload")
   }
   )

я удалила и все стало нормально

person akahuli    schedule 09.08.2016