CLV(X, Xu = NULL, Xr = NULL, method = NULL, sX = TRUE, sXr = FALSE, sXu = FALSE, nmax = 20, maxiter = 20)data(apples_sh)
#directional groups
resclvX <- CLV(X = apples_sh$senso, method = "directional", sX = TRUE)
plot(resclvX,type="dendrogram")
plot(resclvX,type="delta")
#local groups with external variables Xr
resclvYX <- CLV(X = apples_sh$pref, Xr = apples_sh$senso, method = "local", sX = FALSE, sXr = TRUE)
Run the code above in your browser using DataLab