运行应用程序没有给出任何结果 R 闪亮的应用程序并使 RStudio 崩溃

Question

我在运行 R 闪亮应用程序时遇到问题。这就是我所做的：

1. 打开 RStudio
2. 加载闪亮的代码（例如app.R）
3. 设置wd
4. 图书馆（闪亮）
5. 按“运行应用程序”

然后什么也没有发生。

如果我尝试终止执行，R 不再回答并说强制关闭 RStudio。

这是我的代码之一（我尝试了一些，所以我不认为这是问题所在，但无论如何我报告了一个）：

library(shiny)

# Define UI for application that draws a histogram
ui <- fluidPage(
    
    titlePanel("Un'applicazione con uno slider"),
    sidebarLayout(
        h1("Sposta lo Slider!"),
        sliderInput("slider1", "Spostami!", 0, 100, 0)
    ),
    mainPanel(
        h3("Valore dello slider:"),
        textOutput("text")
    )
)

# Define server logic required to draw a histogram
server <- function(input, output) {
    
    output$text <- renderText(input$slider1)
}

# Run the application 
shinyApp(ui = ui, server = server)

为了让事情发生，你有什么建议可以给我吗？我没有显示任何错误，所以我不知道该怎么办...

我只看到“runApp(...mypath.../app)”和后面的空格。

提前谢谢您。

编辑1： 我也尝试过这个，但什么也没发生（和以前一样）：

library(shiny)
runExample("01_hello")

编辑2：直接在控制台中复制粘贴代码也不起作用

Answer 1

我在 Windows 10 上使用 R 4.1 时遇到了同样的问题。更新所有软件包似乎已经解决了这个问题：

 update.packages(ask = FALSE, checkBuilt = TRUE) 

Answer 2

我建议在 Posit 社区发布的解决方案：R crashes Shiny App

library(shiny)
ui <- fluidPage()
server <- function(input, output, session) {  
 session$onSessionEnded(function() { stopApp() })}
shinyApp(ui, server)