inst/application/ui/ui_exit_button.R

# Exit -----------------------------------------------------------
tabPanel("", value = "exit",  icon = icon("power-off"),
         br(),
         br(),
         br(),
         br(),
         br(),
         br(),
         # In case window does not close, one should see this message
         fluidRow(column(3),
                  column(6, h2("Thank you for using", strong("nsetools"), "!"))),
         fluidRow(column(3),
                  column(6, h4("Now you should close this window.")))
)

Try the nse2r package in your browser

Any scripts or data that you put into this service are public.

nse2r documentation built on Nov. 1, 2022, 5:05 p.m.