# NOT RUN {
LASfile <- system.file("extdata", "Topography.laz", package="lidR")
lidar = readLAS(LASfile)
plot(lidar)
dtm1 = grid_terrain(lidar, method = "knnidw")
dtm2 = grid_terrain(lidar, method = "akima")
raster::plot(dtm1, col = height.colors(50))
raster::plot(dtm2, col = height.colors(50))
plot3d(dtm1)
plot3d(dtm2)
# }
# NOT RUN {
dtm3 = grid_terrain(lidar, method = "kriging")
raster::plot(dtm3, col = height.colors(50))
# }
Run the code above in your browser using DataCamp Workspace