如何获取低于特定阈值的点云的高度值（z）作为表格，然后获取区域中的高度平均值？我有以下脚本，并得到一条错误消息，意思是均值不能被计算和表并且不能被强制。当前在R studio中使用lidR。
lidar1 = readLAS(fname, select = "xyzia*P")
lidar1 <- lasclipRectangle(lidar1, minX-10, minY-10, minX+20, minY+20)
filter=lasfilter(lidar1, Z<=1.5)
as.table(lasfilter(lidar1, Z<=1.5))
mean (filter)