## -----------------------------------------------------------------------------
dir <- system.file("extdata", package="oct4")
coldata <- read.csv(file.path(dir,"coldata.csv"))
coldata

## -----------------------------------------------------------------------------
sessionInfo()