[R] RES: Hi

[Leandro Marino]

Try this:

mrp <- function(){
r <- list()
mr<-matrix(0,4,1)
for(i in 1:4){
  r[[i]] <- lm(dat(,i+1)~dat(,1))
 mr[i,1] <- coefficients(r[[i]]) }
mr
}

Atenciosamente,
Leandro Lins Marino
Centro de Avaliação
Fundação CESGRANRIO
Rua Santa Alexandrina, 1011 - 2º andar
Rio de Janeiro, RJ - CEP: 20261-903
R (21) 2103-9600 R.:236 
  (21) 8777-7907
( leandro at cesgranrio.org.br

"Aquele que suporta o peso da sociedade
    é precisamente aquele que obtém
 as menores vantagens". (SMITH, Adam)

  Antes de imprimir pense em sua responsabilidade e compromisso com o MEIO AMBIENTE 

Esta mensagem, incluindo seus anexos, pode conter informacoes privilegiadas e/ou de carater confidencial, nao podendo ser retransmitida sem autorizacao do remetente. Se voce nao e o destinatario ou pessoa autorizada a recebe-la, informamos que o seu uso, divulgacao, copia ou arquivamento sao proibidos. 
Portanto, se você recebeu esta mensagem por engano, por favor, nos informe respondendo imediatamente a este e-mail e em seguida apague-a.


-----Mensagem original-----
De: r-help-bounces at r-project.org [mailto:r-help-bounces at r-project.org] Em nome de Oscar Bayona
Enviada em: segunda-feira, 15 de junho de 2009 18:42
Para: r-help at r-project.org
Assunto: [R] Hi

Hi I have a simple question. I want to run a "n times" a simple linear regession and save beta in a matrix but I4m not able.

Imagine:

Data.txt is a 10*5 file and want to run 4 different stimations always regressing first column on the rest.

So I try this:

First I run Data on memory

This is my function

mrp <- function(){
mr<-matrix(0,4,1)
for(i in 1:4)
r(i)=lm(dat(,i+1)~dat(,1)
 mr[i] <- coefficients(r(i)))
}

I execute mrp usin source file choose option but nothing happens....

Where I4m wrong?

	[[alternative HTML version deleted]]