使用 rep() 函数时的“次”参数无效

Question

我正在尝试向数据框添加一列，并且正在使用 rep() 函数。为什么第一行有效，而下一行却不行？

> S_Grime$Græsning=rep(1:2, 50:49)
> R_Grime$Græsning=rep(1:2, 34:27)
Error in rep(1:2, 34:27) : invalid 'times' argument

我的数据：

> head(S_Grime)
# A tibble: 6 x 3
  Feltnummer value Græsning
       <dbl> <dbl>    <int>
1          1  6.26        1
2          2  5.72        1
3          3  8.74        1
4          4  5.33        1
5          5  6.23        1
6          6  8.67        1
> head(R_Grime)
# A tibble: 6 x 2
  Feltnummer value
       <dbl> <dbl>
1          2     2
2          3     2
3          4     2
4          5     2
5          7     2
6         11     2

> str(R_Grime)
tibble [61 x 2] (S3: tbl_df/tbl/data.frame)
 $ Feltnummer: num [1:61] 2 3 4 5 7 11 12 13 14 15 ...
 $ value     : num [1:61] 2 2 2 2 2 2 2 2 4 2 ...
> str(S_Grime)
tibble [99 x 3] (S3: tbl_df/tbl/data.frame)
 $ Feltnummer: num [1:99] 1 2 3 4 5 6 7 8 9 10 ...
 $ value     : num [1:99] 6.26 5.72 8.74 5.33 6.23 ...
 $ Græsning  : int [1:99] 1 1 1 1 1 1 1 1 1 1 ...

Answer 1

来自?rep.int：

如果times 由一个整数组成，则结果由 整个输入重复了很多次。如果times 是相同的向量 长度为 x（每个复制后），结果由 x[1] 组成 重复times[1]次，x[2]重复times[2]次等等

times 既不是 1 也不是 x 的长度未定义时的行为。

如果您期望 34 个 1，然后是 27 个 2，您应该使用 rep(1:2, c(34,27))。如果您希望 1:2 被回收到与 34:27 相同的长度，您需要特别指定类似 rep(rep(1:2, length.out=length(34:27)), 34:27) 的内容