如何打开 url 作为闪亮的弹出窗口

Question

使用此代码，我可以将 link 作为新选项卡打开，但不知道如何将其作为弹出式或可调整选项卡打开 window

> library(shiny)
    u_id<-123
    inv_id <-111
    url <- paste0("https://www.google.com/","?id=",u_id, "&inv_id=", inv_id)
    ui <- fluidPage(shiny::fluidRow(shiny::actionButton(inputId='ab1', 
       label="click here", value = "Open popup",
       onclick = sprintf("window.open('%s')",url,'resizable,height=260,width=370')))) # Combine text with url variable
    server <- function(input, output) {}
    shinyApp(ui, server)

Answer 1

尝试

sprintf("window.open('%s','win','resizable,height=260,width=370')",url)

如何打开 url 作为闪亮的弹出窗口

how to open the url as a pop in shiny

javascript

r

shiny

rshiny