R 采样-限制每个元素的使用次数

我正在寻找一种方法，以1:40，3812次（长度=3812）的数字为样本，进行替换，但要限制它，使每个数字的使用次数不超过100次。 有没有办法在采样命令（

sample（）

）中建立这种类型的限制？

这里有一个选项：

sample(rep(1:40, 100), 3812)

---

从本质上讲，您首先要构建一个所有可能的数字的向量来进行采样（

rep（1:40100）

），也就是说，每个数字出现的频率与它应该被采样的最大次数（100）相同，然后从中采样而不需要替换。

谢谢！完全有道理：）