从汇总数据中取样

Question

我的数据格式与aggregate的输出非常相似，只是我没有原始的非聚合数据。

示例：

 data <- data.frame(grade=letters[1:4], count=c(3,9,4,1))
  grade count
1     a     3
2     b     9
3     c     4
4     d     1

我想从这些成绩中抽样，例如：使用sample。从这样的汇总计数中取样（没有替换）的最简单方法是什么？

Answer 1

你期待这样的事吗？

> sample(with(data, rep(as.character(grade), count)), 10)
 [1] "b" "b" "d" "a" "c" "c" "b" "b" "c" "b"