# NOT RUN {
lazfile <- system.file("extdata", "example.laz", package="rlas")
lasdata <- readlasdata(lazfile)
lasdata <- readlasdata(lazfile, filter = "-keep_first")
lasdata <- readlasdata(lazfile, filter = "-drop_intensity_below 80")
# }
Run the code above in your browser using DataLab