# NOT RUN {
## required packages
require(uavRst)
## read chm and tree position data
data(chm_seg)
data(trp_seg)
## segmentation
crownsRL <- chmseg_RL(chm= chm_seg[[1]],
treepos= trp_seg[[1]],
maxCrownArea = 150,
exclusion = 0.2)
## visualisation
raster::plot(crownsRL)
# }
Run the code above in your browser using DataLab