How about the following?

lm(as.formula(paste("y~",paste(names(data.frame),
collapse="+"),sep=""),cbind(data.frame,y))

-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Richard Nixon
Sent: 02 April 2003 19:50
To: [EMAIL PROTECTED]
Subject: [R] lm with an arbitrary number of terms


Hello folks,

Any ideas how to do this?

data.frame is a data frame with column names "x1",...,"xn"
y is a response variable of length dim(data.frame)[1]

I want to write a function

function(y, data.frame){
    lm(y~x1+...+xn)
}

This would be easy if n was always the same.
If n is arbitrary how could I feed the x1+...+xn terms into
lm(response~terms)?

Thanks
Richard

--
Dr. Richard Nixon
MRC Biostatistics Unit, Cambridge, UK
http://www.mrc-bsu.cam.ac.uk/personal/richard
Tel: +44 (0)1223 330382, Fax: +44 (0)1223 33038

______________________________________________
[EMAIL PROTECTED] mailing list
https://www.stat.math.ethz.ch/mailman/listinfo/r-help

______________________________________________
[EMAIL PROTECTED] mailing list
https://www.stat.math.ethz.ch/mailman/listinfo/r-help

Reply via email to