cpa(senso, hedo, coord=c(1,2), center = TRUE, scale = TRUE,
nb.clusters = 0, scale.unit = FALSE, name.panelist = TRUE,
col = terrain.colors(45)[1:41])
data(cocktail)
res.cpa = cpa(cbind(compo.cocktail, senso.cocktail), hedo.cocktail)
## If you prefer a graph in black and white and with 3 clusters
res.cpa = cpa(cbind(compo.cocktail, senso.cocktail), hedo.cocktail,
name.panelist = TRUE, col = gray((50:1)/50), nb.clusters = 3)
Run the code above in your browser using DataLab