lasDenoising.LAScluster <-
function(las, offset, ...){
las <- readLAS(las)
if (is.empty(las)) return(NULL)
las <- lasDenoising.LAS(las, offset, ...)
las <- lasfilter(las, buffer == 0)
return(las)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.