R语言Error : Can‘t access reactive value ‘start‘ outside of reactive consumer.设置时间范围筛选数据时，设置可更改时间中的bug

这里没处理好会报一大堆错误

这里就是在对日期中的input#start里的起始时间的值进行设置时，

data[data$DATE >= as.Date(date_start,"mm/yyyy") & data$DATE <= as.Date(date_end,"mm/yyyy"),]

这里date_start需要先赋值，date_start<-input$start,然后在时间筛选过程中，把date_start放进去，
date_end同理
这里有bug的关键之处在于

data01 <-  reactive({
    date_start <- input$start
    date_end <-  input$end
    data[data$DATE >= as.Date(date_start,"mm/yyyy") & data$DATE <= as.Date(date_end,"mm/yyyy"),]})

所有在输出里用到date_start和date_end的数据都要卸载reactive这个大括号里，否则就会报一堆错误