气泡图是一个添加了第三个维度的散点图,在ggplot2中,气泡图通过geom_point()函数建立。本文将利用“gapminder”数据集介绍利用r语言的气泡图绘制。
1 基础气泡图绘制
> library(ggplot2)
> library(dplyr)
> library(gapminder)
# 创建数据
> data <- gapminder %>% filter(year=="2007") %>% dplyr::select(-year)
# 绘图,alpha设置透明度
> ggplot(data, aes(x=gdpPercap, y=lifeExp, size = pop))
+ geom_point(alpha=0.5)
OUTPUT:
2 气泡大小设置
为避免气泡的重叠,可以重新排列数据。
# 处理数据
data %>%
arrange(desc(pop)) %>%
mutate(country = factor(country, country)) %>%
# 绘制气泡图并设置相关参数
ggplot(aes(x=gdpPercap, y=lifeExp, size = pop)) +
geom_point(alpha=0.5) +
scale_size(range = c(.1, 24), name="Population (M)"