Rは繰り返しに関する構文が特殊と言われる。
特にpurrr::mapシリーズはlistについて慣れていないと使い方が難しくてよく理解できないので、見つけた事例を貼っておく。
seq_1 <- map2(1:20, rep(c(22, 24), 10), rep) %>% unlist()