2

両方を1つのプロットに組み合わせると、ヒストグラムと密度線の間のスケーリングに問題があるようです。密度曲線プロットのみと 2 つの組み合わせとの間には、視覚的な明確な違いがあります。2つのプロット間で同じ形状とスケールを持つための解決策は何ですか(密度のみと、ヒストと組み合わせたときの密度) 私はこのコードを使用します：

hist(dataList[[cl12]],xlim=range(minx,maxx),breaks=seq(minx,maxx,pasx),col="grey",main=paste(paramlab,"Group",groupnum,Cl,sep=" "),xlab="",freq=FALSE) 
d<-density(dataList[[cl12]])
lines(d,col="red")

と

  dataList[[cl12]] <- c(4.399449e-02,  2.161474e-02, -1.515223e-05,  1.298059e+01,
      3.163949e-01, -1.785220e+00,  1.041053e+01,  6.327219e-01, -5.778590e-03)

ご協力ありがとうございました！

4

3 に答える 3

3

デフォルトでは、histはビンの頻度をプロットします。密度プロットのスケールと一致するようにビンの確率を表示する場合は、histのfreqパラメーターを使用できます。次に例を示します。

x = rnorm(1000)
plot(density(x))
hist(x, freq=F, add=T)
于 2013-02-20T18:54:48.317 に答える
1

同じことを行う別の方法を次に示します。

test <- rnorm(1000)
plot(density(test))
par(new=T)
hist(test, freq=F, xaxt="n", xlab="", ylab="", main="")
于 2013-02-20T21:06:44.277 に答える
0

データポイントの数が非常に少ないこと以外に問題があるとは思いません。コードを再現可能なバージョンに変更すると、問題ないようです。例えば

x <- c(4.399449e-02,  2.161474e-02, -1.515223e-05,  1.298059e+01,
      3.163949e-01, -1.785220e+00,  1.041053e+01,  6.327219e-01, -5.778590e-03)

hist(x,col="grey",freq=FALSE, breaks=10) 
d<-density(x)
lines(d,col="red")

これは見苦しいプロットになりますが、明らかにこれはデータ ポイントの数が少ないためです。

ここに画像の説明を入力

より多くのデータポイントで同じアプローチを行うと、問題ないようです。

x <- rgamma(100,1,1)

(同じグラフ作成コードを使用)

ここに画像の説明を入力

于 2013-02-22T10:45:22.427 に答える