## A quantitative example with the famous geyser data set
data(bullsEye)
## estimate model (using fast strategy, results may be misleading)
model <- clusterKernel( data=bullsEye[,1:2], nbCluster=2:3
, models= "kernelGaussian_pk_s"
)
## use graphics functions
## Not run:
# plot(model)
# ## End(Not run)
## get summary
summary(model)
## print model
## Not run:
# print(model)
# ## End(Not run)
Run the code above in your browser using DataLab