如何在R - lattice - bwplot中设置异常值的颜色

Question

例如当我得到这个时：

http://i.stack.imgur.com/cWTIm.jpg

似乎我要分别为每个异常值设置颜色......

这是我的（小数）猜测代码：

...,par.settings = list(...,box.rectangle = list(col= c("red","blue")),...) ),...

已经事先提前了！

Answer 1

公平的问题，但请不要发布“代码中的小数猜测”;要求其他人产生样本问题是不公平的。

以下是示例代码，它确认了您找到的内容：

library(lattice)
d = data.frame(x=c(rnorm(90),20*runif(16)),group=letters[1:2])
cols = list(col=c("red","blue"),pch=c(1,16,13))
bwplot(group~x,data=d,  
       par.settings = list(
                           plot.symbol=cols,
                           box.rectangle = cols,
                           box.dot = cols,
                           box.umbrella=cols 
                           ))

以下是代码，显示异常值pch / col / alpha / cex未分组，因此回收不正确。

来自panel.bwplot：

panel.points(x = rep(levels.fos, sapply(blist.out, length)), 
             y = unlist(blist.out), pch = plot.symbol$pch, col = plot.symbol$col, 
             alpha = plot.symbol$alpha, cex = plot.symbol$cex, 
             fontfamily = plot.symbol$fontfamily, ......

这意味着这是格子中缺少的特征（我不会称之为错误）。