search for: ssmatrixglobal

...Sinter and SStotal. In fact I want the result in several matrices: Ssprod matrice: T1 t2 t3 t4 … t101 A1 ssprod(A1,T1) A2 A3 … A8 So I would like a matrice like that for ssprod, ssujet,sserreur,ssinter and sstotal. And this is for one permutation, and I want to do 1000 permutations Here is my code: SSmatrixglobal<-function(k){ daten.temp<-data daten.temp$product=permutations[[k]] listmat<-apply(daten.temp[,5:105],2,function(x,y){ tab2<-as.data.frame(cbind(x,y)) tab.class<-by(tab2[,1:3],tab2[,4],function(x){ f <- formula(paste(names(x)[1],"~",names(x)[2],"*",names(x)[3]...