# NOT RUN {
## load the dataset
dataf = dataf.geneexp()
## view the classes
unique(dataf$labels)
## access the 5th point of the 2nd object
dataf$dataf[[2]]$args[5]
dataf$dataf[[2]]$vals[5]
## plot the data
# }
# NOT RUN {
labels = unlist(dataf$labels)
plot(dataf,
xlab="Time", ylab="Gene Expression Level",
main=paste0("Gene Expression: 1 red (", sum(labels == 1), "), ",
"2 green (", sum(labels == 2), "), ",
"3 blue (", sum(labels == 3), ")"),
colors = c("red", "green", "blue"))
# }
Run the code above in your browser using DataLab