Re: [R] lm.fit algo

2009-08-19 Thread Pavlo Kononenko
Thank you, Steve! 2009/8/18 Steve Lianoglou : > Hi, > > On Aug 17, 2009, at 5:09 PM, Pavlo Kononenko wrote: > >> Hi, everyone, >> >> This is a little silly, but I cant figure out the algorithm behind >> lm.fit function used in the context of promax rotation algorithm: >> >> The promax function is:

Re: [R] lm.fit algo

2009-08-18 Thread Steve Lianoglou
Hi, On Aug 17, 2009, at 5:09 PM, Pavlo Kononenko wrote: Hi, everyone, This is a little silly, but I cant figure out the algorithm behind lm.fit function used in the context of promax rotation algorithm: The promax function is: promax <- function(x, m = 4) { if(ncol(x) < 2) return(x) dn

[R] lm.fit algo

2009-08-18 Thread Pavlo Kononenko
Hi, everyone, This is a little silly, but I cant figure out the algorithm behind lm.fit function used in the context of promax rotation algorithm: The promax function is: promax <- function(x, m = 4) { if(ncol(x) < 2) return(x) dn <- dimnames(x) xx <- varimax(x) x <- xx$loadings