使用函数传递的数据评估模型矩阵

Question

关于为什么只有下面两个“with”调用中的第一个返回模型矩阵，而第二个返回错误消息的任何见解？下面

data<-data.frame(y=runif(10),x=runif(10)) 
formula1<-y~x 
with(data,model.matrix(y~x)) 
with(data,model.matrix(formula1)) 
#Error in eval(predvars, data, env) : object 'y' not found 

Answer 1

工作

data<-data.frame(y=runif(10),x=runif(10)) 
formula1<-"y~x" 
with(data,model.matrix(y~x)) 
with(data,model.matrix(formula(formula1))) 

请非常类似的问题，非常有见地的意见阅读post1和post2。