# NOT RUN {
## See ? featureSignif for uni- and bivariate examples
## Trivariate example
data(earthquake)
earthquake[,3] <- -log10(-earthquake[,3])
fs <- featureSignif(earthquake, scaleData=TRUE, bw=c(0.06, 0.06, 0.05))
plot(fs, addKDE=TRUE, addSignifCurvData=TRUE)
plot(fs, addKDE=FALSE, addSignifCurvRegion=TRUE)
if (interactive()) plot(fs, addKDE=FALSE, addSignifCurvRegion=TRUE, rgl=TRUE)
# }
Run the code above in your browser using DataLab