R：为晶格中的不同面/面板指定颜色

我的数据如下：

grp = rep(1:2, each = 100)
chr = c(rep(1:10, each = 10), rep(1:10, each = 10))
var = paste (grp, "chr", chr, sep = "")
pos = (rep(1:10, 20)) 
yvar = rnorm(200) 
mydf = data.frame (var, pos, yvar)

require( lattice)
xyplot(yvar ~ pos| factor(var), data = mydf, layout = c(1,10), type = c("g", "h"),
         col = "darkolivegreen", lwd = 4)

（1） 我想为备用图形/面板添加不同的颜色-例如-

2chr1

为深绿色，但

chr10

为紫色。然后又是深橄榄绿和紫色等等

（2） 我想用图形的倒序表示

2chr9

在底部

谢谢

---

使用

as.table=TRUE

更改面板和

组的顺序

（以及扩展的

col

vec）更改COO（u）rs

编辑：调整系数级别的顺序

mydf <- 
  data.frame (var, pos, yvar, 
              ##  fvar = factor(var,levels=unique(var)),
              fvar = factor(var, levels = c(outer(2:1, 1:10, paste, sep="chr"))))

xyplot(yvar ~ pos| fvar,
       groups=fvar,
       data = mydf, layout = c(1,10,2), type = c("g", "h"),
       col = c("darkolivegreen","purple"), lwd = 4, as.table=TRUE)

---

@Ben，谢谢，因为桌子可以用，但col不能产生我想要的效果。我不想把不同的颜色，以替代价值观，而以替代面板。。。？？我想这就是我的解决方案。这幅画（刚加的）不是你想要的吗？（你忘了

组

规范了吗？）我想要的合理布局是1Chr1跟随2chr2，1chr2，跟随2chr2……等等……这个评论对我来说意义不大。我把它解释为2chr2，1chr1，2chr2，1chr2。。。也许你的意思是2chr1，1chr1，2chr2，1chr2。。。（更为合理，但我仍然不明白为什么2chr*会先于1chr*每个grp=1:2，应该针对每个chr级别进行分组，尽管我的意图是将它们组合成一个单独的名称，如var=paste（grp，“chr”，chr，sep=“”）我认为子图在

晶格
-世界中称为“面板”，在
ggplot
-世界中称为“面”。。。
library(latticeExtra)
useOuterStrips(xyplot(yvar ~ pos|factor(grp)*factor(chr),
                      groups=grp,
                      col=c("darkolivegreen","purple"),
                      data = mydf, layout = c(2,10), type = c("g", "h"),
                      lwd = 4, as.table=TRUE))