powered by
Function to get legend information for each scale
getLegend(mb)
single entry from ggplot2:::guides_merge() list of legend data
list of legend information, NULL if guide=FALSE.