3.1 创建并保存一个图片
dev.new() # 打开一个新窗口,这样就不会覆盖掉原来的图
png("regress.png")
attach(df)
plot(AGE, COUNTOP) # 画散点图
abline(lm(COUNTOP~AGE)) # 添加最优拟合回归线
title("Regression of COUNTOP on AGE") # 设置标题
detach(df)
dev.off() # 关闭这个窗口
3.2 设置图形参数
3.2.1 par()函数
opar <- par(no.readonly=TRUE)# 以生成可供修改的图形参数列表
par(lty=2, pch=17, lwd=2, cex=2, col="red")
plot(x, y, type="b")
lty线形,pch点形,lwd线条宽度,cex点的大小, col线条颜色。
也可以直接把参数写在plot中
plot(x, y, type="b",lty=2, pch=17, lwd=2, cex=2, col="red")
type=“b” 表示同时绘制点和线。
3.2.2 设置文本的字体、字号、字样
par(cex.axis=2, cex.lab=2, cex.main=1, cex.sub=5)
plot(AGE, EXPENDOP, main="DRAW A PICTURE", sub="hahah", xlab="Dosage", ylab=