Shining/rscript-使用checkboxGroupInput整数列表的反应性绘图不工作

我正在使用rgdal和RSAGA插件开发一些带有R脚本的地理分析软件。我最近发现了闪亮的插件，我很高兴在UI中包装我的循环控制器是多么容易。不幸的是，我对所需的反应性功能有问题，请制作一组复选框值（即单个生态区）在复选框中绘制每个选定生态区轮廓的反应性预览

我有一个checkboxGroupInput，其中包含110个生态区（244278302等）的整数列表，还有一个outputPlot处理程序用于被动输出

为了获得要点，将读取形状文件以提取复选框组（“ed_all”）的生态区列表，并提取具有每个生态区轮廓的形状（“xcheck”）。本质上，我试图完成两件事：

1-生成一个反应变量“ed_list”，当选中复选框时，该变量会更改整数列表

2-使用反应变量“ed_list”和“xcheck”形状进行反应多边形相交，以绘制选定生态区的反应图形

我目前正在使用rsaga.geoprocessor（封装在反应式命令中）进行交叉，但如果有更好的方法，我愿意接受建议。每次我尝试执行此代码时，它都会给我

“在.getReactiveEnvironment（）$currentContext（）中出错： 如果没有活动-反应上下文，则不允许操作。（您试图执行的操作只能从反应函数内部执行。）

或者类似的东西

以下是与我的问题相关的剪辑代码：

    ui.r

    library(shiny)
    library(rgdal)

    setwd("D:\\BC_soil_map")

    ed <- readOGR(".\\BC_data\\BC_Shapes\\BC_soils\\Soil_Polygons_SLC", layer = "EcoDistricts_BC")
    ed_all <- ed$ECODISTRIC
    ed_null <- ed$EDnull

    shinyUI(pageWithSidebar(

    headerPanel(div(align = "center", 
              "Soil Mapping Data-Quilt Application")), 

    sidebarPanel(div(align = "center",  
                     h4("Select and EcoDistrict"),

                     checkboxGroupInput("ed_chkbx", 
                                  label = "",
                                  choices = ed_all,
                                  selected = ed_all))),

    mainPanel(div(align = "center",  
                     h4("Preview"),

                     plotOutput("preview", 
                                width = "500px", 
                                height = "500px"))

               ))

ui.r
图书馆（闪亮）
图书馆（rgdal）
setwd（“D:\\BC\土壤\地图”）
ed错误消息表示您正在访问ShinyServer功能内部的“被动”元素，但在任何被动功能外部

当我试图以类似的方式使用
reactiveValues
时，我也遇到了类似的错误。（我使用的是闪亮的0.5）。我通过在server.R中包装reactives中的所有内容来绕过它们

暗示
尝试注释访问
input$ed\u chkbx

x <- reactiveValues(input$ed_chkbx == TRUE)
ed_list<- reactiveValuesToList(x, all.names = FALSE)

x
x <- reactiveValues(input$ed_chkbx == TRUE)
ed_list<- reactiveValuesToList(x, all.names = FALSE)