R语言画坐标轴示例

###
###
result<-c(0,128,262,8,4,0,396,67,2)
x<-matrix(0,867,1)
y<-matrix(0,867,1)
x[1:390]<-runif(390,0,1);y[1:262]<-runif(262,0,1);y[263:390]<-runif(8,1,2)
x[391:402]<-runif(12,1,2);y[391:394]<-runif(4,1,2);y[395:402]<-runif(8,2,3)
x[403:867]<-runif(465,2,3);y[403:404]<-runif(2,0,1);y[405:471]<-runif(67,1,2)
y[472:867]<-runif(396,2,3)
plot(x,y,col="light green",cex=0.6,axes=F,ylab="",xlab="",main="R画图测试")
abline(v=c(1,2,3),lty=2,col="grey")
abline(h=c(1,2,3),lty=2,col="grey")
axis(1,at=c(-0.5,0.5,1.5,2.5,3),label=c("","L","D","W",""))
axis(2,at=c(-0.5,0.5,1.5,2.5,3),label=c("","L","D","W",""))