Viridis色标和图例

Question

我在那里，

我想使用viridis色标，但是它不起作用。 而且我只想获得一个带有颜色和Alpha比例的图例，因此对于每个箱线图，一个带颜色和透明度的图例...

install.packages("viridis")
library(viridis)
b<-ggplot(boxp, aes(x = boxp$causa, y = boxp$los, fill = boxp$causa, 
alpha=boxp$tdm)) + geom_boxplot() + stat_boxplot(geom='errorbar')+scale_color_viridis(discrete=TRUE)+ theme_bw()

b + labs(x="Parametri", y="los", fill="Parametri")

这是我得到的。真的是一张很差的图。（因为Isolati的观察似乎阿尔法不起作用..）

如何获得更好的？ 谢谢