data(meaudret)
## The labels are in the data array
laba <- dimnames(meaudret)[[1]]
labb <- dimnames(meaudret)[[2]]
labc <- dimnames(meaudret)[[3]]
## Candecomp/Parafac analysis
## Not run:
# CP(meaudret,laba,labb,labc)
# ## Tucker3 analysis
# T3(meaudret,laba,labb,labc)
# ## Tucker2 analysis
# T2(meaudret,laba,labb,labc)
# ## Tucker1 analysis
# T1(meaudret,laba,labb,labc)
# ## End(Not run)
Run the code above in your browser using DataLab