Rでは、次のrep
コマンドを使用して実行できます。
tab <- data.frame(value=c(1, 2, 3, 4, 5), freq=c(2, 1, 4, 2, 1))
vec <- rep(tab$value, tab$freq)
これにより、次の結果が得られます。
> tab
value freq
1 1 2
2 2 1
3 3 4
4 4 2
5 5 1
> vec
[1] 1 1 2 3 3 3 3 4 4 5
詳細については、をrep
入力してコマンドのヘルプファイルを参照してください?rep
。
vec <- sample(1:5, 20, TRUE)
作成者table()
:の単純な頻度表を指定しますrep(names(table(vec)), table(vec))
。次にas.numeric()
、カテゴリが実際の数字である場合、結果を変換する必要があります。