R语言绘制Bump Chart的小示例
# install.packages("tidyverse")
# install.packages("ggbump")
library(tidyverse)
library(ggbump)
#创建数据集:各类商品2018-2021年的销量排名
year <- rep(2018:2021, 7)
position <- c(2,6,5,1,1,5,1,3,5,3,2,5,7,2,4,2,4,1,3,4,6,7,7,7,3,4,6,6)
goods <- c("电话", "电话", "电话","电话",
"配件", "配件", "配件", "