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",""))

  • 1
    点赞
  • 3
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值