6

R で facet_grid を使用して、5 つの異なるグループの RT データをプロットしています。各グループの 5 ～ 95% のデータを強調したいと思います。

以下のコードでは、各グループのパーセンタイルではなく、データ フレーム全体のパーセンタイルを使用しています。facet_grid を引き続き使用し、各グループの一意のパーセンタイルをプロットで強調表示する方法についてのアイデア。

rect <- data.frame (xmin=quantile(ss$RT, c(0.05)), 
                    xmax=quantile(ss$RT, c(0.95)), 
                    ymin=-Inf, ymax=Inf)


qplot(prevRT, RT, group=ss, color = prim, 
      geom = c("smooth"), 
      method="lm", data =ss) + 
   facet_grid(~ Groupe) + 
   geom_rect(data=rect, 
             aes(xmin=xmin, xmax=xmax, ymin=ymin, ymax=ymax), 
             color="grey20", alpha=0.5, inherit.aes = FALSE)
4

1 に答える 1

2

Thanks to DWin's suggestion, I used ave to find xmin and xmax for each group individually and incorporated that directly into the command for the plot.

There is probably a more elegant way to do that (and suggestions are welcome), but it works.

qplot(prevRT, RT, group=ss, color = prim, 
 geom = c("smooth"), 
 method="lm", data =ss) + 
 facet_grid(~ Groupe) + 
 geom_rect(data=ss, 
      aes(xmin=ave(ss$RT, ss$Groupe, FUN = function(x)quantile(x,c(0.05))),      
      xmax=ave(ss$RT, ss$Groupe, FUN = function(x)quantile(x,c(0.95))),
      ymin=-Inf,ymax=Inf), color="green", alpha=1/280, inherit.aes = FALSE)

enter image description here

于 2012-09-19T17:36:20.693 に答える