We are currently developing shinyapp.
The page below has two annotations on the sidebar panel.
(Red frame part)
How can this be applied?
The sample code is below.
If you know, or if you know a web page that can be used as a reference, please let us know.
library(shiny)
library(leaflet)
library(leaflet.extras)
ui <- fluidPage(
titlePanel("ShinyApp"),
sidebarLayout(
sidebarPanel(
),
mainPanel(
)
)
)
server <- function(input, output, session) {}
shinyApp(ui, server)
Nice to meet you.