ui = navbarPage(title = 'Pseudorandom Observations',
collapsible = T,
position = 'fixed-top',
theme = add_theme(getShinyOption('theme')),
header = add_css(),
footer = add_logo(),
tabPanel('PRN Data', DT::dataTableOutput('prn')))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.