可以绘图的语言很多,各种语言各有千秋,前面我们使用了R语言内置的数据集进行了入门级但是又特别简单有趣的绘图,今天我们就针对折线图和散点图为大家仔细讲解一下,如要了解更多,可取我的博客首页R专题,都是作者整理出来的,不易,希望对大家有帮助。
plot()函数基础
plot()函数是什么?我们可以使用:
#查看帮助文档
?plot #或者使用help(plot)查看帮助文档
?mtcars #查看R语言内置的数据集mtcars的信息
实验一 : 索引为x轴,wt字段为y轴
plot(mtcars$wt)#当只有一个参数的时候默认参数会作为y轴
#,x轴用index标识,并且自动填充刻度
实验二 x轴mpg , y轴cyl
head(mtcars[,1:2])#抽出所有行的第一二列字段
mtcars[,1:2]#绘图,x轴mpg , y轴cyl
plot(mtcars[,1:2])
实验三 输入所有列
#直接传入数据集本身
plot(mtcars)#也就是所谓的图集,会把每一个字段属性都绘制一个图
plot()参数的使用
type=xxx我就只是举了几个常用的,其他的类型类似前面大家去查看帮助文档即可
#1.折线图 type:控制绘图的方式
plot(mtcars$wt,mtcars$disp,type='l')
#2.点和线全部进行绘制
plot(mtcars$wt,mtcars$disp,type='b')
绘制有序的线
order(c(1,3,2)) 测试函数,其实就是一个排序函数
折线图一般是探索一个变量变化的时候,另外一个变量变化的趋势,实际一般极大值,极小值
mtcars <- mtcars[order(mtcars$wt),]
plot(mtcars$wt,mtcars$disp,type = 'l')
一页多图
参数:局部,全局
#main显示图像主标题
par(mfrow=c(3,3))#这是全局参数,这句代码你可以简单理解为
#把一个画板分成3*3的区域,再次绘图
for(i in c("p","l","b","c","o","h","s","S","n")){#c向量代表了type参数的可取范围
plot(mtcars$wt,mtcars$disp,type=i,main = paste("type",i))
#paste是R语言的拼接字符串函数
}
pch控制显示的形状
cex放大为之前的多少倍
大家下去多尝试一下了解即可
plot(mtcars$wt,mtcars$disp)
plot(mtcars$wt,mtcars$disp,pch=5)
plot(mtcars$wt,mtcars$disp,pch=5,cex=0.5)
lty设置线条样式 范围:1-6
lwd 线条的宽
plot(mtcars$wt,mtcars$disp,type = 'c',lty=1,lwd=4)
col控制颜色,color的简写,R语言支持多种颜色的表达方式
plot(mtcars$wt,mtcars$disp
,type = 'l',lty=3,lwd=3
,col='blue')
#col 范围1:8
plot(mtcars$wt,mtcars$disp
,type = 'l',lty=3,lwd=3
,col='3')#数字
plot(mtcars$wt,mtcars$disp
,type = 'l',lty=3,lwd=3
,col='#0000FF')#十六进制
plot(mtcars$wt,mtcars$disp
,type = 'l',lty=3,lwd=3
,col=rgb(0,0,1))#rgb
在这里我随便举了一个例子:
色调,饱和度,亮度
plot(mtcars$wt,mtcars$disp
,type = 'l',lty=3,lwd=3
,col=hsv(h=240/360),s=1,v=1)
在使用的时候可能会报出警告,目前的话我们忽略警告
设置X轴和Y轴比例尺
plot(mtcars$wt,mtcars$disp
,xlim = c(2,5)
,ylim = c(0,500))
注意查看x,y轴的变化范围,就是我们设置的比例尺范围
设置X轴和Y轴的标题
#main主标题
#sub副标题
#xlab | ylab 坐标的名称
plot(mtcars$wt,mtcars$disp
,xlim = c(2,5)
,ylim = c(0,500)
,main = "pikaqiu"
,sub = "2020-05-15"
,xlab = "wt"
,ylab = "disp"
)
ann = F 取消主标题和副标题以及x,y 的lab值。但是它不能取消title()方法添加上去的字段。
plot(mtcars$wt,mtcars$disp
,xlim = c(2,5)
,ylim = c(0,500)
,main = "pikaqiu"
,sub = "2020-05-15"
,ann = F
)
plot(mtcars$wt,mtcars$disp
,xlim = c(2,5)
,ylim = c(0,500)
,ann=F
)
#这个函数不能单独使用,如果使用的话,新加的lab会加到x,y原有的lab上
title(main="pikaqiu2",sub="2020-02-04"
,xlab = "wt2",ylab = "disp2")