r - 将整数切成相等大小的整数并分配给向量

Question

让我们假设整数 x .我想将此数量拆分为 n大部分相等的块并将值保存在向量中。例如。如果 x = 10和 n = 4那么结果向量将是:

(3,3,2,2)

如果 n = 3 :

(4,3,3)

注意:结果向量的顺序无关紧要

Answer 1

虽然这会在 x 时创建一个(可能是不必要的)大对象很大，它仍然很快:

x <- 10
n <- 4
tabulate(cut(1:x, n))
#[1] 3 2 2 3

在一台体面的现代机器上，将 10M 记录分成 100K 组，只需要 5 秒:

x <- 1e7
n <- 1e5
system.time(tabulate(cut(1:x, n)))
# user  system elapsed 
# 5.07    0.06    5.13