1 使用图形
1.1 交互式绘图
使用的是内置数据集:mtcars
画出散点图:plot(mtcars$mpg,mtcars$wt)
给图形加标题:title(“车辆耗油与重量之间的关系”)
加回归线:abline(lm(mpg~wt,data=mtcars))
(为什么我的没有回归线呢??)
1.2 保存
(1)保存为.pdf
pdf(“abb.pdf”)
plot(mtcars$mpg,mtcars$wt)
title(“车辆耗油与重量之间的关系”)
abline(lm(mpg~wt,data=mtcars))
dev.off()
(2)保存为.jpg
jpeg(“abb.jpg”)
plot(mtcars$mpg,mtcars$wt)
title(“车辆耗油与重量之间的关系”)
abline(lm(mpg~wt,data=mtcars))
dev.off()
1.3 弹出新窗口
attach(mtcars)
dev.new()
plot(mpg,wt)
title(“车辆耗油与重量之间的关系”)
abline(lm(mpg~wt))
detach(mtcars)
2 例子
2.1 数据输入
dose<-c(20,30,40,50,60)
drugA<-c(16,20,27,40,60)
drugB<-c(15,18,25,31,41)
2.2 点线图绘制,设置参数type=”b”,意思是同时绘制折线图
plot(dose,drugA,type=”b”)
3 图形参数
3.1 全局图形参数与局部图形参数
局部参数:只旨在这个语句里起作用
plot(dose,drugA,type=”b”,lty=2,pch=17)
解释:type=”b”,意思是绘制折线图,lty=2意思是虚线,pch=17意思是三角标识,详情查手册即可
全局参数设置:par
画图:plot(dose,drugA,type=”b”)
保存原始图片:opar<-par(no.readonly = T)
设置全局参数:par(lty=2,pch=17)
画图显示设置后的结果:plot(dose,drugA,type=”b”)
3.2 符号与线条
plot(dose,drugA,type=”b”,lwd=5,cex=4)
解释:lwd是设置线条的宽度,cex是设置三角标识的大小
3.3 颜色
plot(dose,drugA,type=”b”,col=2,col.axis=4)
解释:col设置线条的颜色,col.axis设置坐标轴刻度的颜色
3.4 文本属性
plot(dose,drugA,type=”b”,cex.lab=1.5,font.lab=3)
解释:cex.lab是设置坐标轴字体大小,font.lab设置字体为斜体
3.5 尺寸
dev.new()
par(mai=c(.2,.2,.2,.2))
plot(dose,drugA,type=”b”,cex.lab=1.5,font.lab=3)
解释:mai 在全局参数下设置页边距,cex.lab是设置坐标轴字体大小,font.lab设置字体为斜体