使用 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]重复times[1]次、 x[2] times[2]重复times[2]次等组成

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

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