ggplot2绘制散点图进阶二

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