小编Oma*_*adi的帖子

我试图在反应函数中过滤数据集，以便我可以上下移动滑块并更改数据集的大小。

我使用名为“sliderfordata”的滑块作为名为“yeardata”的反应函数的输入，以便我使用该反应函数作为 output$chart 的数据输入。 我正在使用的数据集也是 mtcars。

错误消息：：取消分类（x）中的错误：无法取消环境分类

当我选择一个文件作为数据上传时会发生这种情况，该文件映射到从文件路径读取数据文件的reactivefunc。

任何帮助表示赞赏！

服务器代码

library("dplyr")
server <- function(input, output, session) {


  yeardata <- reactive({
    mtcarslist <- reactivefunc()
    df <- mtcarslist %>%
      filter(mpg >= input$sliderfordata)


  })
  output$chart <- reactive({

    dataframe <- yeardata()
    gggraph <-
      ggplot(dataframe, aes(x = mpg , y = hp))
    gggraph <- gggraph + geom_point()
    gggraph
  })



  reactivefunc <- reactive(
    csv <- read.csv(input$file$datapath)
  )


  # scatter plot the mtcars dataset - mpg vs hp
  output$graph <- renderPlot({
    # filename = …