向R中的图添加不同的曲线

reza 发表于 Dev

雷扎

我知道我可以像使用和R包一样向每个绘图窗格添加相同的曲线（请参见blow）。layerlatticelatticeExtra

但是，假设我们想向每个绘图窗格添加不同的曲线。

例如，在下面的例子中，我不知道如何添加v1仅在上图，v2在左下的情节，并v3在右下角的情节？

library(lattice)
library(latticeExtra)    

set.seed(24)
v1 <- density(rnorm(1e3, 3.5))
v2 <- density(rnorm(1e3, 3))
v3 <- density(rnorm(1e3, 2.75))


foo <- xyplot((1:32*.01)~wt|gear , data = mtcars)
foo + layer(panel.polygon(v1, col = 2, alpha = 0.3))

阿克伦

这是一个选择

foo + 
   layer(if(panel.number() == 3) {
            panel.polygon(v1, col = 2, alpha = 0.3)
      } else if(panel.number() == 1) {
            panel.polygon(v2, col = 2, alpha = 0.3)
      } else{
           panel.polygon(v3, col = 2, alpha = 0.3)
    })

数据

library(lattice)
library(latticeExtra)    

set.seed(24)
v1 <- density(rnorm(1e3, 3.5))
v2 <- density(rnorm(1e3, 3))
v3 <- density(rnorm(1e3, 2.75))


foo <- xyplot((1:32*.01)~wt|gear , data = mtcars)

本文收集自互联网，转载请注明来源。

如有侵权，请联系 [email protected] 删除。