Question

我正在使用闪亮来创建一个简单的应用程序。

ui.R

library(shiny)
shinyUI(fluidPage(
  titlePanel("Power Breakdown!"),
  sidebarLayout(
    sidebarPanel()
      mainPanel(
        plotOutput("plt"))
      )
     ) )

和server.R是（所需数据集位于loc）

library(shiny)
library(ggplot2)
df <- readRDS("dataframe-path")
shinyServer(
  function(input, output) {
     output$plt <- renderPlot({
       df$timestamp <- as.Date(df$timestamp)
       p <- ggplot(df,aes(df$timestamp,df$power))+theme_bw() +geom_point()
       print(p)
       })
    })

运行此应用程序时，会生成以下错误

Error in df$timestamp : object of type 'closure' is not subsettable

每当我运行与普通R脚本相同的服务器脚本时，一切正常，但在上面的错误中使用相同的代码片段闪亮结果。

注意：我在链接1，2，3上提到了相同的问题，但没有取得任何成功

Answer 1

您想要从df$电话中删除aes：

p <- ggplot(df,aes(timestamp,power))+theme_bw() +geom_point()

这是因为aes is scoped

的原因

对象类型＆＃39;关闭＆＃39;不是子集[GGplot2，Shiny]

1 个答案: