增加x轴因子和图之间的距离

Question

有没有办法在ggplot中自定义x轴因子和图之间的距离？

library(ggplot2)
female <- ggplot(gender_and_age[(1:7),], aes(x = gender_and_age, y = count)) + geom_bar(stat = 'identity', fill = 'lightpink1')+ theme_light() + geom_text(aes(label = sprintf("%.2f%%", count/sum(count) * 100)),  vjust = -.5)

返回此情节

我想在“13-17”，“18-24”，“25-34”，“35-44”，“45-45”，“55-64”，“65+”之间设置一个空格和情节

这就是我想要的