## Not run:
# ## the bull eyes data set
# data(bullsEye)
# model <- clusterKernel( bullsEye[,1:2]
# , 2
# , models= "kernelGaussian_pk_s"
# )
# plot(model)
# ## End(Not run)
Run the code above in your browser using DataLab