I have a ggplot made of a likert-scale using the package likert by jason.bryer (see). If you run the code with the original data here, then my extrem label (in the far right) i
You could also make the legend two rows, which would create ample room:
guides(fill = guide_legend(nrow = 2))