Message-ID: <1308600176110-3612388.post@n4.nabble.com>
Date: 2011-06-20T20:02:56Z
From: Daniel Malter
Subject: for loop and linear models
In-Reply-To: <BANLkTin3Dyf578v_iyzBUj4ufgKUJJ4D6A@mail.gmail.com>
Hi,
can you put "return(models)" within the inner braces and report what it
does. That might do the trick, since it should return the 'models' for every
combination of i and j.
HTH,
Daniel
hazzard wrote:
>
> Hi,
>
> I have two datasets, x and y. Simplified x and y denote:
>
> X
>
> Y
>
> A B C A B C . . . . . . . . . . . . . . . . . .
> I want to implement all possible models such as lm(X$A~Y$A), lm(X$B~Y$B),
> lm(X$C~Y$C)... I have tried the following:
>
> fun<- function(x,y){
> for(i in 1:length(colnames(x))){
> for(j in 1:length(colnames(y))){
> if(colnames(x)[i]==colnames(y)[j]){
> models=list(lm(ts(x[i])~ts(y[j])))
> }
> else{}
> }
> }
> return(models)
> }
>
> The problem is that this returns only one of the three models, namely the
> last one. What am I doing wrong? Thank you very much in advance.
>
> Regards
>
> [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
> http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>
--
View this message in context: http://r.789695.n4.nabble.com/for-loop-and-linear-models-tp3612274p3612388.html
Sent from the R help mailing list archive at Nabble.com.