inst/apps/distribution_beta/ui.R

ui = navbarPage(title = 'Beta Distribution',
                collapsible = T, 
                position = 'fixed-top',
                theme  = add_theme(getShinyOption('theme')),
                header = add_css(),
                footer = (),


tabPanel('Overview',
         uiOutput('betaover', class = 'ta-text')),
                                
tabPanel('Shiny App',
         add_ui('distribution_beta_functions')),

tabPanel('Distribution Functions',
         uiOutput('betafunc', class = 'ta-text')),

tabPanel('Distribution Properties',
         uiOutput('betaprops', class = 'ta-text')))

Try the teachingApps package in your browser

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

teachingApps documentation built on July 1, 2020, 5:58 p.m.