どのようにしてggplot2でジッタや透明性なしにポイントを重ね克服ん

Question

私はggplot2を使用し始めています。私はいくつかの小さなN（約30程度）の重なりの多い粒状データを有しています。ジッタもアルファ（透明度）のいずれも好適です。代わりに、スタックとストリップチャートは最善を尽くしオフセットが、私はggplot2でどのように行うのか分かりません。あなたは知っていますか？

/最終結果は<このグラフィックをクリックしてどうあるべきかを確認するにはA>。

ここで私が数年前に使用されるスクリプトです。

stripchart(SystData$DayTo1Syst~SystData$strain,vertical=TRUE,method="stack",pch=19,offset=.3,xlab="Strain",main="Rapidity of Systemic Disease Onset",ylab="Days post inoculation")

Answer 1

# your data
df <- data.frame(gp = rep(LETTERS[1:5], each =8), y = sample(1:4,40,replace=TRUE))
# calculate offsets
df <- ddply(df, .(y, gp), transform, offset = (1:length(gp)-1)/20)
qplot(gp, y, data=df) + stat_identity(aes(as.numeric(gp)+offset)) + theme_bw() 

Answer 2

あなたはposition_dodgeを使用することができます。

df <- data.frame(gp = rep(LETTERS[1:5], each =8), 
                 y = sample(1:4,40,replace=TRUE))
qplot(gp,y,data=df,order=y,position=position_dodge(width=0.5))

altテキストhttp://img100.imageshack.us/img100/8760/dodgel.pngする

Answer 3

あなたが使用したい geom_dotplot のggplot2

から

あなたはおそらく使用したいと思うでしょう。

ggplot(insert your arguments here) + geom_dotplot(binaxis = "y", stackdir = "center")

希望、このことができます。結果は、私はあなたが欲しいと思うものをしている本当にきれいになります。