Enrole automaticamente rótulo de texto ggplot
g +
scale_x_discrete(labels = scales::wrap_format(10))
# where scale_x_discrete is your scale of choice
# where 10 == the number of characters you'd like to wrap before
Connor