# \donttest{
# import aRchi file
aRchi=system.file("extdata","Tree_2.aRchi",package = "aRchi")
aRchi = aRchi::read_aRchi(aRchi)
# smooth skeleton
aRchi = smooth_skeleton(aRchi)
# segment annual shoots
aRchi = aRchi::segment_annual_shoots(aRchi,tree_age = 13)
# add physiological ages
aRchi = aRchi::add_physiological_ages(aRchi)
# add leaves
aRchi = aRchi::add_leaves(aRchi)
plot(aRchi,leaves=TRUE,bg="white",color="chocolate4")
# }
Run the code above in your browser using DataLab