您可以使用theme()中的plot.margin调整绘图边距，然后使用element_text()的vjust参数移动轴标签和标题。例如 ：

library(ggplot2)
library(grid)
qplot(rnorm(100)) +
    ggtitle("Title") +
    theme(axis.title.x=element_text(vjust=-2)) +
    theme(axis.title.y=element_text(angle=90,vjust=-0.5)) +
    theme(plot.title=element_text(size=15,vjust=3)) +
    theme(plot.margin = unit(c(1,1,1),"cm"))

会给你这样的东西：

如果你想了解更多关于不同的theme()参数和它们的参数的信息，你可以在R提示符下输入？theme。