我正在完成Hadley Wickham的书ggplot2中的练习。该书要求重新创建一张图片:
这是我的代码:
library(tidyverse)
count <- mpg %>%
group_by(drv, cyl) %>%
summarise(n = n())
count
ggplot(mpg, aes(x = cyl, y = drv)) +
geom_point(aes(size = n), data = count, position = "jitter")
但是它没有显示相同的图片。我无法弄清楚该图是哪个几何图形。但有一件事是,图中的点可能意味着与cyl和drv相匹配的观测值。
数据为mpg,包含在tidyverse软件包中。