# NOT RUN {
setup <- readSetup(Read = TRUE) # run if you would like to upload the example setup
data(setup_data)
setup <- readSetup(Read = TRUE, setup_data)
# Create your own setup
a <- rep("no",7)
b <- "1990-01-01"
c <- "1991-01-01"
d <- "2012-12-15"
e <- "2012-12-10"
table_setup <- data.frame(set=a,stringsAsFactors = FALSE)
table_setup <- rbind(table_setup, b, c, d, e)
setup <- readSetup(Read = FALSE, table_setup)
# }
Run the code above in your browser using DataLab