用R从LiDAR点云制作漂亮的GIF (使用lidR包?)

Question

谁能指给我一些R代码，从LiDAR点云中制作出编程上不错的GIF，就像LidR包(https://www.rdocumentation.org/packages/lidR/versions/3.0.3)中的旋转点云一样？

Answer 1

library(lidR)
library(rgl)

LASfile <- system.file("extdata", "MixedConifer.laz", package="lidR")
las = readLAS(LASfile)

exportPath = tempfile()

plot(las, bg = "white")
movie3d(spin3d(), duration = 5, movie = exportPath)

查看movie3d和spin3d的文档以控制速度和帧数。