### Building data
myCld <- gald(c(15,15,15))
### Standard kml3d
kml3d(myCld,,2,toPlot="both")
### Using median instead of mean
parWithMedian <- parKml(centerMethod=function(x){median(x,na.rm=TRUE)})
kml3d(myCld,,2,toPlot="both",paramKml=parWithMedian)
### Using distance max
parWithMax <- parKml(distanceName="maximum")
kml3d(myCld,,2,toPlot="both",paramKml=parWithMax)
Run the code above in your browser using DataLab