使用 rep() 函数时无效的 'times' 参数

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:

If times consists of a single integer, the result consists of the whole input repeated this many times. If times is a vector of the same length as x (after replication by each), the result consists of x[1] repeated times[1] times, x[2] repeated times[2] times and so on

如果 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)

之类的内容专门指定它

使用 rep() 函数时无效的 'times' 参数

invalid 'times' argument when using rep() function

r

rep