ボックスプロットと同じプロット上の特定の点をどのようにプロットしますか？

Question

私たちは以下のようにボックスプロットを描くことができます：

として

qplot(factor(cyl), mpg, data = mtcars, geom = "boxplot") 

とポイント：あなたは両方の組み合わせだろうか

qplot(factor(cyl), mpg, data = mtcars, geom = "point") 

- しかし、ちょうどwtが2未満であると、いくつかの特定のポイントは、（と言う表示するには）箱の上に？

Answer 1

qplotに+ geom_point(...)を使用してください（すべての点をプロットするには、+ geom_point()を追加してください）。

n <- nrow(mtcars) 
# plot every second point 
idx <- seq(1,n,by=2) 

qplot(factor(cyl), mpg, data=mtcars, geom="boxplot") + 
    geom_point(aes(x=factor(cyl)[idx],y=mpg[idx])) # <-- see [idx] ? 

あなたが前に手のポイントを知っている場合、あなたは例えば、直接にそれらを養うことができます：

qplot(factor(cyl), mpg, data=mtcars, geom="boxplot") + 
    geom_point(aes(x=factor(c(4,6,8)),y=c(15,20,25))) # plot (4,15),(6,20),... 

Answer 2

あなたができるだけでプロットするこれらの点を選択し、選択的プロットに

qplot()ではなくggplot()を使用して両方を表示してください。構文は理解するのが少し難しいかもしれませんが、通常もっと多くのことができます。あなたはボックスプロットとあなたが書くことができるポイントの両方をプロットしたい場合：

boxpt <- ggplot(data = mtcars, aes(factor(cyl), mpg)) 
boxpt + geom_boxplot(aes(factor(cyl), mpg)) + geom_point(aes(factor(cyl), mpg)) 

（私はあなただけのボックスの上に特定のポイントをプロットすることによって何を意味するのか分からないが、あなたは安いしたい場合やちょうどボックスの端の上の点を示すのはおそらく非常にスマートではない）方法は、ここにある：基本的に

boxpt + geom_boxplot(aes(factor(cyl), mpg)) + geom_point(data = ddply(mtcars, .(cyl),summarise, mpg = mpg[mpg > quantile(mpg, 0.75)]), aes(factor(cyl), mpg)) 

geom_pointに供給されたデータを除いて、同じことがで唯一のmpg番号を含むように調整されていますシリンダーによる分配の第4四半期。一般的に、私は人々がウィスカーを超えてポイントを見ることを期待していると思うので、これは良い練習ではないと思うが、そこに行く。

Answer 3

2つの異なるデータセット（mtcarsのボックスプロット、リテラル値のdata.frameのポイント）を使用して2つのギオムをプロットしようとしている場合は、これを行い、意図を明確にする方法です。これは私が点の集合のためcolor = 'red'に投げた（ggplot2_2.1.0）

library(ggplot2) 
ggplot() + 
    # box plot of mtcars (mpg vs cyl) 
    geom_boxplot(data = mtcars, 
       aes(x = factor(cyl), y= mpg)) + 
    # points of data.frame literal 
    geom_point(data = data.frame(x = factor(c(4,6,8)), y = c(15,20,25)), 
      aes(x=x, y=y), 
      color = 'red') 

ggplotの（2016年9月）現在のバージョンで動作しますので、geom_boxplot

の一部として生成されたポイントと区別するのは簡単です