R 如何在点阵打印中使点大小独立于分组

R 如何在点阵打印中使点大小独立于分组,r,plot,lattice,R,Plot,Lattice,假设我想用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
绘制一系列不同大小的点的图,如:

> 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
独立于
组和
|
,例如在
组的
示例中,我希望看到一个像第一个图一样的图,只有色差。

这是可行的:

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)}
       )
    }
)
库(晶格)
G
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)}
       )
    }
)