## load the dataset
dataf = dataf.medflies()
## 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
if (FALSE) {
labels = unlist(dataf$labels)
plot(dataf,
xlab="Day", ylab="# eggs",
main=paste("Medflies (training time):\n short-lived red (", sum(labels == "short-lived"), "),",
" long-lived blue (", sum(labels == "long-lived"), ")", sep=""),
colors = c("blue", "red") # in alphabetical order of class labels
)
}
Run the code above in your browser using DataLab