cat("See the following PDF for mathematical details:\n")
cat(docFile, sep="\n")
## Not run:
# if (interactive() && requireNamespace("Biobase")) {
# Biobase::openPDF(docFile)
# }## End(Not run)
library(utils)
data(ca533)
ca533.rwi <- detrend(rwl = ca533, method = "ModNegExp")
ca533.crn <- chron(ca533.rwi, prefix = "CAM")
gini.coef(ca533.crn)
Run the code above in your browser using DataLab