cosyong <br /> x=runif(100)<br /> e=rnorm(100)<br /> y=1+x+e</p> <p>fit<-lm(y~1+x)<br /> summary(fit)<br /> </p>