ggplot2 中绘图清空 x轴或者y轴的title

library(ggplot2)
p <- ggplot(faithful, aes(x = eruptions, y = waiting)) + 
  geom_point()
p  

p + theme(axis.title.x =element_blank())     ## 清空x轴title