首先你把横轴纵轴要打的东西分别放在2个向量month和sales
month<-paste(5,1:31,sep="/")
sales<-sample(100,31) #我随机从1到100里抽31个数
然后你把plot(1:31,sales,xaxt="n",xlab="Each day")打出来 xaxt="n"就是先不显示x的刻度
下面跟
>axis(1,labels=month,at=1:31,las=3) 1是你要对x轴作修改，labels就是你要打的内容，at就是你要多少个刻度(这里只能是1到31)，las是这些刻度的显示形式，3就是竖着
参照http://yangl.net/2016/08/09/axis_text_x/这个博客data=c(4.51,10.69,9.33,7.34,5.09,11.68,4.47,8.53,13.99,5.22,4.22,9.23,7.86)
labs=c(“Species1″,”Species2″,”Species3”, “Species4”, “Species5”, “Species6”, “Species7”, “Species8”, “Species9”, “Species10”, “Species11”, “Species12”, “Species13”)
barplot(data,col=c(“steelblue”,”steelblue”,”steelblue”,”mediumturquoise”,”mediumturquoise”,”mediumturquoise”,”mediumturquoise”,”mediumturquoise”,”mediumturquoise”,”sandybrown”,”hotpink”,”hotpink”,”hotpink”),ylim=c(0,14),width=1,space=1,ylab=”%(……)”,las=1)
text(x=seq(1.5,25.5,by=2),y=-0.15, srt = 45, adj = 1, labels = labs,xpd = TRUE)
说白了就是自己用text设置标签，注意SRT=45
r语言修改横坐标斜体的方法是：1、取FALSE时将不会画出标题（包括主、副标题及坐标轴标题）。
2、设置边框形式，默认值为"o"，表示四面边框都画出。其余可选值包括"l"（左下）、7（上右）、c（上下左）、u（左下右）、"]"（上下右）和"n"（无，即不画边框）。
3、设置x轴和y轴的范围，默认值为r，表示坐标轴比给定作图范围，比参数xlim和ylim给出的范围大一些。赋值为i时表示坐标轴范围与给定作图范围完全相同。
4、取n时，坐标轴、刻度线以及刻度值将不会画出。
