ola77的博客

#保存图片 pdf("mygraph.pdf") attach(mtcars) plot(wt,mpg) abline(lm(mpg~wt)) title("regression of MPG on Weight") detach(mtcars) dev.off() #3.2药物剂量水平上的响应情况 dose <-c(20,30,40,45,60) drugA <-c(16,20,27,40,60) drugB <-c(15,18,25,31,40) plot(dos