Nothing
## Funciones para uso general del menú de R commander
#SofiWebsite <- function() {browseURL("http://www.sofi.uno/")}
Estadistica1 <- function() {runApp(system.file("Estadist/Cal_Dis", package="Sofi"), launch.browser = TRUE)}
Estadistica2 <- function() {runApp(system.file("Estadist/Distrib", package="Sofi"), launch.browser = TRUE)}
Estadistica3 <- function() {runApp(system.file("Estadist/Estas", package="Sofi"), launch.browser = TRUE)}
Estadistica4 <- function() {runApp(system.file("Estadist/ggMarginal", package="Sofi"), launch.browser = TRUE)}
Estadistica5 <- function() {runApp(system.file("Estadist/Modulo108", package="Sofi"), launch.browser = TRUE)}
Estadistica6 <- function() {runApp(system.file("Estadist/plotzoom105", package="Sofi"), launch.browser = TRUE)}
Estadistica7 <- function() {runApp(system.file("Estadist/RANDU", package="Sofi"), launch.browser = TRUE)}
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.