使用R和ggplot2在boxplot图例键中的透明度

I am trying to make boxplots with a transparent fill and a corresponding legend. The plotting with alpha values works fine except that the legend keys do not have transparent fills. The following example illustrates the difficulty:I am trying to make boxplots with a transparent