Particles in modalDialog about particlesjs

[pvictor]

Hello,

There's an issue initializing particles when DOM elements are not completely initialized. I added a timeout argument to wait before creating particles.

Re-install package from GitHub, and try example below.
I added position: absolute; to the H1 tag to make it appear above particles.
timeout = 1000 means "wait 1000ms before creating particles".

library(shiny)
library(shinyparticles)

server <- function(input,output) {            
  
  observeEvent(input$show_modal, {
    showModal(modalDialog(
      tags$div(
        id="particles-target", 
        tags$h1("Hello World", style = "position:absolute;"),
        style="height: 400px; width: 100%;"
      ),
      particles(target_id = "particles-target", timeout = 1000),
      size="l" 
    ))
  })
  
}

ui <- fluidPage(
 actionButton("show_modal", "Show modal")
)

shinyApp(ui, server)

Let me know if it works for you

Victor

It works!!! thanks a lot.