r - Rの周波数比

Question

私は2つのファイルにデータを持っています。それらの周波数の比率をグラフにプロットしたいと思います。

たとえば、私のファイルでは、1 から 5 までの数字が 20 回出現します。私のファイル B では、1 から 5 までの数字が 10 回出現します (ヒストグラムの棒の幅は 5 です)。この 2 つの比率は 20/10 = 2 です。この比率をグラフにプロットしたいと思います。Rを使用して実行できますか？

Answer 1

変数内の 2 つのファイルを読み取り、次のことができると仮定しdata1ます。data2

bins <- seq(0, 100, 5) # Change this to whatever range your data encopasses
h1 <- hist(data1, bins, plot=0)
h2 <- hist(data2, bins, plot=0)

ratio <- h1$counts/h2$counts
# Remove NaNs and Infs due to 0 counts
ratio[is.na(ratio)] <- 0
ratio[is.inf(ratio)] <- 0
barplot(ratio)

または、3 番目の hist オブジェクトを作成することもできます。これには、x 軸を正しくプロットするという利点があります。

h3 <- h1
h3$counts <- ratio
plot(h3, col="black")