function to load js for using shinyFeedback
useShinyFeedback(feedback = TRUE, toastr = TRUE)
ui <- shinyUI(fluidPage(
useShinyFeedback(
feedback = TRUE,
toastr = TRUE
),
pageWithSidebar(
headerPanel("Header"),
sidebarPanel(
...
),
mainPanel(
...
)
)
))