上篇文章记录了散点图如何用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函数的效果一致,具体的区别还不太清楚,有兴趣的小伙伴可以下方留言讨论一下。