热图用例场景

ggplot2 数据可视化进阶

Rick Scavetta

Founder, Scavetta Academy

barley 数据集

head(barley, 9)

      yield   variety year            site
1  27.00000 Manchuria 1931 University Farm
2  48.86667 Manchuria 1931          Waseca
3  27.43334 Manchuria 1931          Morris
4  39.93333 Manchuria 1931       Crookston
5  32.96667 Manchuria 1931    Grand Rapids
6  28.96667 Manchuria 1931          Duluth
7  43.06666   Glabron 1931 University Farm
8  55.20000   Glabron 1931          Waseca
9  28.76667   Glabron 1931          Morris

基础热图

ggplot(barley, aes(year, variety, 
                   fill = yield)) + 
  geom_tile() +
  facet_wrap(vars(site), ncol = 1) +
  ...

点图

ggplot(barley, aes(yield, variety, 
                   color = year)) + 
  geom_point(...) +
  facet_wrap(vars(site), ncol = 1) +
  ...

时间序列表示

ggplot(barley, aes(year, yield, 
                   group = variety,
                   color = variety)) + 
  geom_line() +
  facet_wrap(vars(site), nrow = 1) +
  ...

使用并列误差线

ggplot(barley, aes(x = year, y = yield, 
                   group = site, 
                   color = site)) +
  stat_summary(fun = mean, 
               geom = "line", ...) +
  stat_summary(fun.data = mean_sdl, 
               geom = "errorbar", ...) +
  ...

使用色带表示误差

ggplot(barley, aes(x = year, y = yield, 
                   group = site, 
                   color = site)) +
  stat_summary(fun = mean, 
               geom = "line", ...) +
  stat_summary(fun.data = mean_sdl, 
               geom = "ribbon", ...) +
  ...

编程时间！

ggplot2 数据可视化进阶