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