R shiny：在 observeEvent 中 save reactiveValues 为 .RData 格式文件

遇到的问题

运行如下代码时，会报错 Error in save: objects ‘XXX’ not found
（简化版便于理解，完整代码等下一个版本传了github再来贴链接）

server端：

    prePquant <- reactiveValues(tmp = NULL)
    
    observeEvent(判断条件, {
   
   	  ……
      tmp <- 赋值
      ……
    })
   
    observeEvent(判断条件, {
   
      ……
      save(prePquant