FR: Add more options to control yr & yt

[voxnonecho]

For example, I want to identify the top 3 values in a bar graph on the right side:

v_yr <- rowSums(mat, na.rm = TRUE)
col_yr <- rep("grey50", length(v_yr))
col_yr[tail(order(v_yr), 3)] <- viridis::plasma(1) 

But I would also like to add text labels on those specific values.

[rlbarter]

You should be able to color the top three values manually as your code seems to indicate. I will think about adding text capabilities to the adjacent plots. Currently it's not high on my priority list (but it is also easier than other things on my priority list!).

I'll let you know when I get around to this!