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

【问题标题】：How to set the color of outlier in R - lattice - bwplot如何在 R - lattice - bwplot 中设置异常值的颜色
【发布时间】：2012-06-01 01:11:30
【问题描述】：

例如当我得到这个时：

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

看来我必须为每个异常值分别设置颜色...

这是我对代码的（部分）猜测：

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

已经提前了！

【问题讨论】：

标签： r graphics statistics lattice

【解决方案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, ......

这意味着这是 lattice 中缺少的功能（我不会称之为错误）。

【讨论】：

嗨，你说得对，我应该举个例子。我真的以为我只是忘记设置一些东西，这样就不会发生这个问题。最好的解决方案（我猜）是设置一种颜色，然后将其回收用于所有其他异常值。再次感谢！