data(stonePine1TreeData)
vectors <- treeVectors(stonePine1TreeData)
CM <- centreOfMass(vectors)
summary(CM)
# The steps to recreate this dataset:
csvFileName <- system.file("data", "stonePine1FieldData.csv.gz", package = "treecm")
treeData <- importFieldData(csvFileName, 650, allometryABDC)
treeData <- treeBiomass(treeData)
Run the code above in your browser using DataLab