r - 要約データからのサンプルの取得

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"