ggplot2设置箱线图boxplot异常值outlier的填充色outlier.fill

ggplot2绘制线形图的时候，异常值的点颜色默认和箱子的线条颜色一致，没有额外的填充色了，设置outlier.fill并不能奏效。

library(tidyverse)
x1 <- rlnorm(200)
x2 <- rlnorm(300)

df1 <- data.frame(type = 'A', value = x1)
df2 <- data.frame(type = "B", value = x2)

df <- rbind(df1, df2)

ggplot(data = df, aes(x = type, y = value, fill = type)) + 
	geom_boxplot(outlier.fill = "white") + 
	theme_bw()

如何设置箱线图的异常值填充色？
答案是设置异常值的点的类型为21，默认的点类型是不能填充的！

ggplot(data = df, aes(x = type, y = value, fill = type)) + 
	geom_boxplot(outlier.shape = 21) +
	theme_bw()