如何在闪亮中打开链接

Posted 2023-03-24

【中文标题】如何在闪亮中打开链接

【英文标题】：how to open a link in shiny

【发布时间】：2021-09-30 07:42:25

【问题描述】：

借助此代码，我可以在新选项卡中打开 url，而不是如何在同一窗口中以弹出窗口的形式打开此 url

library(shiny)
ui <- fluidPage(shiny::fluidRow(shiny::actionButton(inputId='ab1', 
label="click here", value = "Open popup",onclick ="window.open('http://google.com','_blank')")))

server <- function(input, output) 
shinyApp(ui, server)

提前致谢

【参考方案1】：

我猜你只是想要一个可调整大小的浏览器标签弹出窗口，为此你编辑 JS 并添加 resizable 参数：

library(shiny)
ui <- fluidPage(shiny::fluidRow(shiny::actionButton(inputId='ab1', 
                                                    label="click here", value = "Open popup",onclick ="window.open('http://google.com','_blank','resizable,height=260,width=370')")))

server <- function(input, output) 
shinyApp(ui, server)

【讨论】：

我想将 url 显示为 pop 而不是 msg 先生，否则你能告诉我如何在新窗口中打开 url，它可以根据大小改变@Pork CHop

这没关系，但是这可以在同一个窗口中以弹出窗口的形式打开这个 url

【参考方案2】：

也许：

onclick = 'window.open("http://google.com", "Google", "width=480,height=360,resizable=no,toolbar=no,menubar=no,location=no,status=no")'

【讨论】：

在哪里查看可调整大小的工具栏菜单栏位置统计信息以及所有@Stephane Laurent