search for: outrer

...3 9 4 16 ie a collection of flats of outer products, now in R the same function gives an error for un conmensurable arrays. I have to re- write po as po <- function(a,b) { bb <- array(0,dim=c(dim(a),dim(b)[2]) for (i in 1:dim(a)[1]) { bb[i,,] <= outrer(a[i,],b[i,]) } bb } Am I missing something? . The help files for 'apply' in R and is S+ are exaclty the same, but the implementations obviously are different. . . Another, tring again to port FUNFITS i get a lot of errors for missing i-o something, I deleted all the 'write(*,*)...