在渲染图中运行 ggplot 时出现许多错误标志（通常有光泽）

Question

使用了非常基本的闪亮脚本并且能够使用通用数据集。当我尝试放入自己的并运行 ggplot 时，我遇到了几个错误。最近出现在我 Rstudio 闪亮应用程序和控制台主面板中的内容 ... "ggplot2 doesn't know how to deal with data of class reactive" ... 总的来说，我将我的 ggplot 精简到最基本的元素，但仍然不确定 ggplot 在闪亮时从哪里调用数据。我在猜测反应函数，但老实说，我迷路了。

下面是脚本

_____ui.R________

shinyUI(pageWithSidebar(
  headerPanel('Mock Risk Scorecard'),
  sidebarPanel(
    selectInput('xcol', 'X Axis', names(RandomRiskCard)),
    selectInput('ycol', 'Y Axis', names(RandomRiskCard),
                selected=names(RandomRiskCard)[[2]]),
                 min = 1, max = 9),
  mainPanel(
    plotOutput('plot1')
  )
)
)

_____server.R____

palette(c("#E41A1C", "#377EB8"))
shinyServer(function(input, output, session) { 
  # Combine the selected variables into a new data frame
  selectedData <- reactive({
    RandomRiskCard[, c(RandomRiskCard$xcol, RandomRiskCard$ycol)]
  }) 
  output$plot1 <- renderPlot({
    p <- ggplot(selectedData, aes(x = RandomRiskCard$xcol, y = RandomRiskCard$ycol))
  p <- p + geom_point()
  })
})

我还加载了我的数据并在不同的脚本中运行 Shiny windows，如下所示

install.packages("shiny")
library(shiny)
library(ggplot2)
runApp("U:/App-1")

以及

RandomRiskCard = read.csv("U:/App-1/RandomRiskCard.csv")

我最终希望合并因子函数并用颜色进行注释，就像我对原始 ggplot 所做的那样。如果不是很明显，我是这方面的新手，但闪亮让我完全扭曲了。

Answer 1

响应式表达式应该以与无参数函数相同的方式调用，并带有以下括号：ggplot(selectedData(),...
xcol 和 ycol 应该通过 input:
获得
p <- ggplot(selectedData(), aes(x = input$xcol, y = input$ycol)) 在 output$plot 和

RandomRiskCard[, c(input$xcol, input$ycol)] 在 selectedData

在渲染图中运行 ggplot 时出现许多错误标志（通常有光泽）

Many error signs when running ggplot in render plot (shiny in general)

r

ggplot2

shiny