R Shiny Bar Chart - Plotly Bar Chart Add A Second Factor For Coloring Opacity