使用变化的行值r插入特定数量的行

Question

我有一个数据帧

catch    yr     mesh
253     2013    0       
4947    2013    1       
3656    2013    1.25        
3259    2013    1.5     
2902    2013    1.75        
4605    2013    2       
764     2013    2.25        
256     2013    2.5

我想插入重复"0"中的值的行；yr"；以及"；网状物"；乘以"0"中对应的行值；捕获"；柱

所以，我想要253行，值为253的catch，2013的yr，&0用于网格。。。4947行，渔获量值为4947，年份值为2013，网格值为1，等等。

Answer 1

tidyr::uncount()正是这样做的。

library(tidyr)
uncount(catch_data, catch, .remove = FALSE)

输出：

# A tibble: 20,642 × 3
catch    yr  mesh
<dbl> <dbl> <dbl>
1   253  2013     0
2   253  2013     0
3   253  2013     0
4   253  2013     0
5   253  2013     0
6   253  2013     0
7   253  2013     0
8   253  2013     0
9   253  2013     0
10   253  2013     0
# … with 20,632 more rows