Nothing
## urls for menu
r_url_list <- getOption("radiant.url.list")
r_url_list[["Single mean"]] <-
list("tabs_single_mean" = list("Summary" = "basics/single-mean/", "Plot" = "basics/single-mean/plot/"))
r_url_list[["Compare means"]] <-
list("tabs_compare_means" = list("Summary" = "basics/compare-means/", "Plot" = "basics/compare-means/plot/"))
r_url_list[["Single proportion"]] <-
list("tabs_single_prop" = list("Summary" = "basics/single-prop/", "Plot" = "basics/single-prop/plot/"))
r_url_list[["Compare proportions"]] <-
list("tabs_compare_props" = list("Summary" = "basics/compare-props/", "Plot" = "basics/compare-props/plot/"))
r_url_list[["Goodness of fit"]] <-
list("tabs_goodness" = list("Summary" = "basics/goodness/", "Plot" = "basics/goodness/plot/"))
r_url_list[["Cross-tabs"]] <-
list("tabs_cross_tabs" = list("Summary" = "basics/cross-tabs/", "Plot" = "basics/cross-tabs/plot/"))
r_url_list[["Correlation"]] <-
list("tabs_correlation" = list("Summary" = "basics/correlation/", "Plot" = "basics`/correlation/plot/"))
options(radiant.url.list = r_url_list)
rm(r_url_list)
## try http://127.0.0.1:3174/?url=basics/goodness/plot/&SSUID=local
## http://127.0.0.1:7407/?url=basics/compare-means/plot/&SSUID=local-a82049
## design menu
options(
radiant.basics_ui =
tagList(
navbarMenu(
"Basics",
tags$head(
tags$script(src = "www_basics/js/run_return.js")
),
"Probability",
tabPanel("Probability calculator", uiOutput("prob_calc")),
tabPanel("Central Limit Theorem", uiOutput("clt")),
"----", "Means",
tabPanel("Single mean", uiOutput("single_mean")),
tabPanel("Compare means", uiOutput("compare_means")),
"----", "Proportions",
tabPanel("Single proportion", uiOutput("single_prop")),
tabPanel("Compare proportions", uiOutput("compare_props")),
"----", "Tables",
tabPanel("Goodness of fit", uiOutput("goodness")),
tabPanel("Cross-tabs", uiOutput("cross_tabs")),
tabPanel("Correlation", uiOutput("correlation"))
)
)
)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.