# NOT RUN {
DIR = getwd()
setwd(tempdir())
data(airquality)
# the following line returns an error:
## OneFactor("Ozone", "Month", airquality, Folder=tempdir(), View=FALSE)
# so we make a copy of the data.frame, and fix that:
airquality2 = airquality
airquality2$Month = as.factor(airquality$Month)
# and now all is good to try:
OneFactor("Ozone", "Month", airquality2)
# N.B. Various files and a folder were created in a temporary directory.
# Please investigate them to see how this function worked.
setwd(DIR)
# }
Run the code above in your browser using DataLab