minitab - R：设置条形图中单个数据点的颜色

Question

我无法在条形图中设置异常值的颜色。我尝试了两种方法，但都没有奏效。

这是代码：

x = rnorm(30)
x[20]=10

# 1
stripchart(x,main='Outlier Plot',xlab='x', pch=20, col=ifelse(x==10, 'red', 'blue'))

# 2
cols = rep('blue',length(x))
cols[which(x==10)]='red'
stripchart(x,main='Outlier Plot',xlab='x', pch=20, col=cols)

颜色都是蓝色的，没有变化。

预期的图显示在 minitab 链接中：

https://support.minitab.com/en-us/minitab/20/help-and-how-to/statistics/basic-statistics/how-to/outlier-test/perform-the-analysis/select-the-图形/

Answer 1

points() 不适用于条形图。所以使用带有选项'add = TRUE'的stripchart（）

    stripchart(x,pch=20,col='blue')
    stripchart(x[11],col='red',pch=20, add=TRUE)