# NOT RUN {
LASfile <- system.file("extdata", "Topography.laz", package="lidR")
las <- readLAS(LASfile, select = "xyzrn")
las <- lasground(las, csf())
plot(las, color = "Classification")
# }
Run the code above in your browser using DataCamp Workspace