How can I get an icon to render with downloadLink
, just like for actionLink
, downloadButton
, and actionButton
?
library(shiny)
ui <- pageWithSidebar(
headerPanel("My Header"),
sidebarPanel(),
mainPanel(
actionButton(inputId = "myactionButton",
label="my action button",
icon=icon("home")),
HTML("<br>"),
actionLink(inputId = "myactionLink",
label="my action link",
icon=icon("home")),
HTML("<br>"),
downloadButton(outputId = "mydownloadButton",
label = "my download button",
icon=icon("home")),
HTML("<br>"),
downloadLink(outputId = "mydownloadLink",
label = "my download link",
icon=icon("home"))
)
)
server <- function(input, output) {
}
shinyApp(ui, server)