Coder Social home page Coder Social logo

Comments (1)

MohoWu avatar MohoWu commented on September 26, 2024

Ok, I figured this out. I can't define a second ExtendedTask with the same name. I thought shiny module would handle the namespace automatically but apparently not. To fix the issue put ExtendedTask$new where it only run once (i.e. inside the server function), and pass the task as an argument to shiny module.

if (interactive()) {
  library(shiny)
  
  task_btn_ui <- function(id) {
    ns <- NS(id)
    tagList(
      
      bslib::input_task_button(
        id = ns("btn"),
        label = "task"
      ),
      shiny::textOutput(ns("msg"))
    
    )
  }
  
  task_btn_server <- function(id, task) {
    moduleServer(
      id,
      function(input, output, session) {
        ns <- session$ns
        
        task |> bslib::bind_task_button("btn")
        
        
        shiny::observeEvent(input$btn, {
          task$invoke()
        })
        
        output$msg <- shiny::renderText({
          task$result()
        })
        
      }
      
    )
  }
  

  ui <- bslib::page_fluid(
    shiny::actionButton("add_task", "Add Task"),
    shiny::div(
      id = "container"
    )
  )

  server <- function(input, output, session) {
    
    future::plan(future::multisession)
    
    task <- ExtendedTask$new(
      function() {
        promises::future_promise({
          Sys.sleep(10)
          "Success"
        })
      }
    ) 
    
    shiny::observeEvent(input$add_task, {
      
      rid <- stringi::stri_rand_strings(1, 10)
      
      shiny::insertUI(
        "#container",
        ui = task_btn_ui(rid)
      )
      
      task_btn_server(rid, task)
      
    })
  
  }

  shinyApp(ui, server)
}

from shiny.

Related Issues (20)

Recommend Projects

  • React photo React

    A declarative, efficient, and flexible JavaScript library for building user interfaces.

  • Vue.js photo Vue.js

    🖖 Vue.js is a progressive, incrementally-adoptable JavaScript framework for building UI on the web.

  • Typescript photo Typescript

    TypeScript is a superset of JavaScript that compiles to clean JavaScript output.

  • TensorFlow photo TensorFlow

    An Open Source Machine Learning Framework for Everyone

  • Django photo Django

    The Web framework for perfectionists with deadlines.

  • D3 photo D3

    Bring data to life with SVG, Canvas and HTML. 📊📈🎉

Recommend Topics

  • javascript

    JavaScript (JS) is a lightweight interpreted programming language with first-class functions.

  • web

    Some thing interesting about web. New door for the world.

  • server

    A server is a program made to process requests and deliver data to clients.

  • Machine learning

    Machine learning is a way of modeling and interpreting data that allows a piece of software to respond intelligently.

  • Game

    Some thing interesting about game, make everyone happy.

Recommend Org

  • Facebook photo Facebook

    We are working to build community through open source technology. NB: members must have two-factor auth.

  • Microsoft photo Microsoft

    Open source projects and samples from Microsoft.

  • Google photo Google

    Google ❤️ Open Source for everyone.

  • D3 photo D3

    Data-Driven Documents codes.