一旦进程以闪亮的方式完成,在调用者中捕获数据

问题描述

我想知道在过程完成后检索数据的正确方法是什么,然后在绘图中使用这些数据,例如?理想情况下,我想将结果保存在 reactiveValues()reactive() 中。这可能吗?

代表:

library(shiny)
library(callr)
library(ggplot2)

ui <- fluidPage(
  plotOutput("plot")
)

server <- function(input,output,session) {
  
  slow_function <- callr::r_bg(
    func = function() {
      Sys.sleep(2)
      mtcars
    },supervise = TRUE
  )
  
  output$plot <- renderPlot({
    req(!slow_function$is_alive())
    
    ggplot(slow_function$get_result(),aes(mpg,hp)) +
      geom_point()
  })
}

shinyApp(ui,server)

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)