我有一个数据集,其中指定了每个人的记录数:
set.seed(99)
# Create values from a Poisson distribution
freqs <- rpois(100, 3)
# Add an ID to each row
freqs <- as.data.frame(freqs)
freqs$id <- seq_len(nrow(freqs))现在我希望freqs$freqs中的值是每个ID的观察值。
ID freqs
1 3
2 1
... ...
3 2结果是:
ID freqs
1 3
1 3
1 3
2 1
... ....
3 2
3 2发布于 2019-06-11 00:08:27
一个选项是来自tidyr的uncount
library(tidyr)
library(dplyr)
uncount(freqs, freqs, .remove = FALSE) %>%
as_tibble %>%
select(id, freqs)https://stackoverflow.com/questions/56529845
复制相似问题