search for: tpzi

Displaying 1 result from an estimated 1 matches for "tpzi".

Did you mean: tpi
2006 Jan 23
1
will vectorization help in this case?
...names(Pizi)[1]) ); tempa = 1; for(j in 1:length(flst)) tempa = tempa %X% flst[[j]]; tempPzu = apply(tempa, 1, sum); tPzu = tPzu + tempPzu; tPuzu[,as.character(r[[l,"u"]])] = tPuzu[,as.character(r[[l,"u"]])] + tempPzu; tempPzi = apply(tempa, 2, sum); tPzi = tPzi + tempPzi; tPizi[,as.character(r[[l,"i"]])] = tPizi[,as.character(r[[l,"i"]])] + tempPzi; for(j in 1:ncomp) tPrjzuzilst[[j]][,,r[[l,rbase+j]]] = tPrjzuzilst[[j]][,,r[[l,rbase+j]]] + tempa; } =========================================================== My question...