Рендеринг URL через valueBox () или renderValueBox () - PullRequest
Новая
       8

Рендеринг URL через valueBox () или renderValueBox ()

0 голосов
/ 15 апреля 2019

Я хочу сделать сайт с помощью 'valueBox' в виде гиперссылки. Здесь ниже код: 

library(shiny)
library(shinydashboard)

ui = shinyUI(dashboardPage(
  dashboardHeader(title = "sam"),
  dashboardSidebar( ),
  dashboardBody(
           fluidRow(
      valueBox("100", subtitle = tags$p("Attendance", style = "font-size: 
200%;"),
           icon = icon("trademark"), color = "yellow", width = 4,
           href = "https://economictimes.indiatimes.com/")
    ) )))

server <- shinyServer(function(input, output) {

})

shinyApp(ui,server)

Я не знаю, как кодировать для рендеринга URL через valueBox () или renderValueBox ().

На данный момент URL / сайт отображается в существующем окне. Я хочу, чтобы URL / веб-сайт отображались во всплывающем окне.

Может кто-нибудь помочь мне в этой проблеме?

Заранее спасибо.

1 Ответ

0 голосов
/ 15 апреля 2019

Оберните valueBox внутри тега a. В теге вы можете установить target = "_blank", чтобы открыть ссылку в новом окне или вкладке. 

tags$a(
  href = "https://economictimes.indiatimes.com/", # Link to open
  target = "_blank", # Open in new window
  valueBox("100", subtitle = tags$p("Attendance", style = "font-size: 200%;"),
           icon = icon("trademark"), color = "yellow", width = 4)
)
...