# NOT RUN {
LASfile <- system.file("extdata", "MixedConifer.laz", package="lidR")
las <- readLAS(LASfile)
plot(las)
plot(las, color = "Intensity")
# If outliers break the color range, use the trim parameter
plot(las, color = "Intensity", trim = 150)
plot(las, color = "Classification")
# This dataset is already tree segmented
plot(las, color = "treeID")
# single file catalog using data provided in lidR
ctg = readLAScatalog(LASfile)
plot(ctg)
# }
Run the code above in your browser using DataLab