坐标 vs. 比例尺
ggplot2 数据可视化进阶
Rick Scavetta
Founder, Scavetta Academy
绘制原始数据
ggplot(msleep, aes(bodywt, y = 1)) +
geom_jitter() +
scale_x_continuous(limits = c(0, 7000),
breaks = seq(0, 7000, 1000))
转换原始数据
ggplot(msleep, aes(log10(bodywt), y = 1)) +
geom_jitter() +
scale_x_continuous(limits = c(-3, 4),
breaks = -3:4)
添加对数刻度标注
ggplot(msleep, aes(log10(bodywt), y = 1)) +
geom_jitter() +
scale_x_continuous(limits = c(-3, 4),
breaks = -3:4) +
annotation_logticks(sides = "b")
使用 scale_*_log10()
ggplot(msleep, aes(bodywt, y = 1)) +
geom_jitter() +
scale_x_log10(limits = c(1e-03, 1e+04))
比较直接变换与 scale_*_log10() 的输出
使用 coord_trans()
ggplot(msleep, aes(bodywt, y = 1)) +
geom_jitter() +
coord_trans(x = "log10")
比较 scale_*_log10() 与 coord_trans() 的输出
调整标签
