2012-05-01 Rで多変量回帰 R data1<-data.frame(a,b,c) l2<-lm(c~a+b,data=kawase) summary(l2) plot(data1$c,type="l") points(predict(l2),type="l",col=3) plot(l2)