首先你把横轴纵轴要打的东西分别放在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就是竖着
axis(side,at=,labels=,pos=,lty=,col=,las=,tck=,…)labels是axis坐标轴的一个字符型向量系数，用来表示纵轴的标签。
