## uncomment to install 
## install.packages("ggplot2")
## install.packages("directlabels")
## install.packages("plyr")
## options(repos=c(RStudio='http://rstudio.org/_packages', getOption('repos')))
## install.packages("shiny")
## install.packages("devtools")
## devtools::install_github("shiny-incubator", "rstudio")

library("shiny")
library("shinyIncubator")

persons <- c("Christoph", "Heidi", "Giuseppe", "Daniel", "Martin", "Vroni")
runApp("./")


shiny::runGist('https://gist.github.com/4412234')