水天一色DIY 发表于 2013-4-12 16:03 
不是很明白楼主遇到具体问题何在
(如果是针对"xvars=age sex x1 x2",好像没见过如此定义,为了统一定义xv ...
按照你的思路
mydata <- read.csv("http://www.ats.ucla.edu/stat/data/binary.csv")
attach(mydata)
yvar=data.frame(admit)
xvars=data.frame(gre,gpa,rank)
myfun<-function(yvar,xvars){
regress.out<- glm(yvar~xvars, data = mydata, family = "binomial")
}
myfun(yvar="yvar",xvars="xvars")
运行有误啊,谢谢!