# 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