0

同じデータ フレームに統合された 2 つのヒストグラム (母集団が異なる) を取得するために、このhttps://stackoverflow.com/a/3542115/3483997アプローチに従っていました。

ROS_SPITFIRE <- data.frame(length = rnorm(100, 0.76406353, 0.500970292)) ROS_FARSITE <- data.frame(length = rnorm(398, 3.48366834170854,2.19050069588744))

#Now, combine your two dataframes into one. First make a new column in each. ROS_SPITFIRE$veg <- 'ROS_SPITFIRE' ROS_FARSITE$veg <- 'ROS_FARSITE'

#and combine into your new data frame vegLengths vegLengths <- rbind(ROS_SPITFIRE, ROS_FARSITE)

#now make your lovely plot ggplot(vegLengths, aes(length, fill = veg)) + geom_density(alpha = 0.3) ggplot(vegLengths, aes(length, fill = veg)) + geom_density(alpha = 0.3)

ggplot(vegLengths, aes(length, fill = veg)) + geom_histogram(alpha = 0.5, aes(y = ..density..), position = 'identity') ggplot = ggplot + xlim((0,15))

各データフレームに新しい列を作成したときに問題が発生しました。負の値が生成されるため、最終的な分布プロットの X 軸に負の値が表示されます。誰もそれを修正する方法を知っていますか?

どうも

4

1 に答える 1

0

mean使用されている特定の およびに固執する必要があるsdが、負の値を除外する必要がある場合は、データセットをフィルタリングするROS_SPITFIRE[ROS_SPITFIRE$length>0,]か、チャートで制限を行うことができますxlim(0,12)。

分布を修正できる場合は、負の値にならない分布または値を選択できます。@Dave と @jbaum は、sample(seq(.1, 1, by = .1), 100, replace = T)このルートをたどるための他の配布オプションの使用または評価などのガイダンスを提供します。

チャート作成に直接進み、制限を設けることで、いくつかのステップを切り取ることもできます。

ggplot(ROS_SPITFIRE, aes(length, y = ..density..,fill="spitfire")) + 
geom_histogram(alpha = 0.5,  position = 'identity')+ 
geom_histogram(data=ROS_FARSITE, aes(fill="farsite"), 
                 alpha = 0.5, position = 'identity')+
xlim(0,12)

ここに画像の説明を入力

于 2014-04-01T14:45:05.250 に答える