上篇文章记录了散点图如何用ggplot2包中的pch参数调整点的类型和参数col调整点的颜色以及如何按照分组绘制不同颜色的散点图,而且特别提醒大家分组属性需要转化为因子型数据,用函数factor()实现,详细参考文章https://mp.weixin.qq.com/s/pDF0DaBHuszMX2nCPVT0iQ.
接下来我们继续深入学习散点图绘制:个性化设置点的颜色、形状等参数。
以mtcars内置数据为例
data<-< span="">mtcars[,c(3,4)]data
## disp hp## Mazda RX4 160.0 110## Mazda RX4 Wag 160.0 110## Datsun 710 108.0 93## Hornet 4 Drive 258.0 110## Hornet Sportabout 360.0 175## Valiant 225.0 105## Duster 360 360.0 245## Merc 240D 146.7 62## Merc 230 140.8 95## Merc 280 167.6 123## Merc 280C 167.6 123## Merc 450SE 275.8 180## Merc 450SL 275.8 180## Merc 450SLC 275.8 180## Cadillac Fleetwood 472.0 205## Lincoln Continental 460.0 215## Chrysler Imperial 440.0 230## Fiat 128 78.7 66## Honda Civic 75.7 52## Toyota Corolla 71.1 65## Toyota Corona 120.1 97## Dodge Challenger 318.0 150## AMC Javelin 304.0 150## Camaro Z28 350.0 245## Pontiac Firebird 400.0 175## Fiat X1-9 79.0 66## Porsche 914-2 120.3 91## Lotus Europa 95.1 113## Ford Pantera L 351.0 264## Ferrari Dino 145.0 175## Maserati Bora 301.0 335## Volvo 142E 121.0 109
以mtcars数据的第3和第4列作为数据,先绘制散点图并调整点的类型和颜色
library(ggplot2)
## Warning: package 'ggplot2' was built under R version 4.0.5
ggplot(data = data, mapping = aes(x = disp, y = hp)) + geom_point(pch = 3 , col = "blue")
设置分组,给自己想自定义上色的点分组
gro<-< span="">c(rep("A",10),rep("B",10),rep("C",12))data_gro<-< span="">data.frame(data,gro)
自定义改变点的形状
ggplot(data = data_gro, mapping = aes(x = disp, y = hp,shape = gro))+#可以用shape或者pch,###注意color一定要加在此处,不能加在geom_point()里 geom_point()
自定义不同点的颜色和大小
ggplot(data = data_gro, mapping = aes(x = disp, y = hp, colour=gro)) +###注意color一定要加在此处,不能加在geom_point()里 geom_point(size= 2)+ scale_color_manual(values = c('#FF0000','#6495ED','#9A32CD'),labels = c('group1','group2','group3'))#用labels设置图例中分组的名字
scale_color_manual函数和scale_fill_manual函数的效果一致,具体的区别还不太清楚,有兴趣的小伙伴可以下方留言讨论一下。