Question

我正在尝试使用网格包绘制几条线来生成平铺图形。这是一个例子（这是错误的，见下文）：

img1 http://ubuntuone.com/5ICds7K0Xjb4NCgUep3NFB

我想模仿这个（就颜色模式而言）：

img2 http://ubuntuone.com/33xwm3JDAx4DKc9VYzFZm9

两个图都着色相同的变量“subset $ speed1DaboveT”。第一个用xyplot完成，第二个用levelplot完成。

我的问题是带曲线的那个没有正确着色，可能是因为我问错了。我从另一个问题（重要的是，这是一个单一的数字）中跟随了这个例子：

dfrm <- data.frame( y=c(rnorm(10),rnorm(10)),
                x=1:10, 
                grp=rep(c("a","b"),each=10))

xyplot(y~x, group=grp, type="l", data=dfrm, col=c("red","blue"))

通过做：

keys=unique(subset$speed1DaboveT)
theseCol= colF(length(keys))

pp= xyplot( freq~patch|B+G
        ,data=subset
        ,scales=list( x=list(cex=0.5), y=list(cex=0.5,lim=c(0,1.1)) )
        ,strip = FALSE
        ,t='l'
        ,group=speed1DaboveT
        ,col=theseCol
        ,lwd=2
        ,cex=0.5
        ,panel = function(x, y, col, ...) {                
                   panel.xyplot(x, y, col=col, ...) 
               }
        )

在我的情况下，我使用2个因子（B和G），示例没有。这可能意味着给予xyplot的颜色应该遵循不同的顺序？谁知道怎么做？

Answer 1

所以，我没注意到范围不一样。对不起这个问题，一旦我强制xyplot的颜色范围与levelplot相同，就会解决问题，即[0,0.16]

感谢

平铺xyplots，如何独立着色以模仿水平图？

1 个答案: