r - 如何使点大小独立于点阵绘图中的分组

Question

假设我想使用 xyplot 绘制一系列不同大小的点的图，例如:

> xyplot(1:6 ~ 1:6, cex = 1:6)

情节就像

但是当我向图中添加组时，每个组内点的大小是同质的。

> g <- c('A', 'A', 'B', 'B', 'C', 'C')
> xyplot(1:6 ~ 1:6, groups = g, cex = 1:6)

此外，如果我使用 | 进行分组，那么在每个方面，点的大小再次从 cex 中的第一个值开始

> xyplot(1:6 ~ 1:6 | g, cex = 1:6)

那么是否有任何解决方案可以使 cex 独立于 groups 和 | ，例如在 groups 示例中，我希望看到像第一个仅具有色差的图一样的图。

Answer 1

嗯，这有效:

library(lattice)    
g <- c('A', 'A', 'B', 'B', 'C', 'C')

xyplot(1:6 ~ 1:6, groups = g,
       panel=function(x,y,subscripts,...) {
       panel.superpose(x,y,subscripts,...,
         panel.groups=function(x,y,subscripts,group.number,...){
               panel.xyplot(x,y,cex=subscripts,col=group.number)}
       )
    }
)

subscripts 跟踪整个数据集的索引(点大小)， group.number 跟踪组的索引(颜色)。