在R Studio中的格子图中,按面板颜色按颜色分组

时间:2019-06-26 19:26:46

标签: r lattice

我想将每个参与者的响应时间分为小组图。我已经能够按会话和主题进行分离,但是我想在面板上针对显示刺激的每个方向绘制单独的线条。 (我还需要每个面板的回归线和总体均值线,但这些组件没有问题)。

在点阵中,“行”代码无法识别分成几组的代码。此外,键符号是与期望的颜色不同的颜色。如果有人知道如何修改一个或两个,那就太好了。我已经尝试了许多不同的更改,包括panel.superpose,但是我无法使其正常工作。这是一个可重现的示例:

library(vegan)
library(dplyr)
ANT$block=factor(ANT$block)
ANT$rtLOG=log(ANT$rt)

我对统计数据进行了分组

ANT_stats_bysub_bydirection_bytime= ANT %>%
  group_by(subnum, direction, block) %>%
  summarise_at(("rtLOG"), funs(mean, sd), na.rm=TRUE)
mypanel=function(x,y,h, k){
  panel.xyplot(x, y, lty=1, type=c('p', 'l'))
  panel.lmline(x, y, lty=3, lwd=1, col="purple")
  panel.grid(h=-1, v=-1)
  panel.abline(mean(h), lty=2, col="red")
  llines(x, y, col=c("blue", "green")) 
}

colors=c("blue", "green")
keylist=list(space="top", col=c("blue", "green", "red", "purple"), columns=1, text=c("Left", "Right", "Mean", "Regression"))
xyplot(mean~block|subnum, groups=direction, data=ANT_stats_bysub_bydirection_bytime, 
       h=ANT_stats$mean, layout=c(5,4), aspect=1.5, 
       main="Subject Response Time, by Direction and Session", xlab="Session", 
       ylab="Mean Response Time", panel=mypanel, auto.key=keylist)

Output Graph

如您所见,所有线都已连接,包括“分组”方向之间的线。此外,方向不会用颜色分开。

0 个答案:

没有答案