r - 在R中自定义图形

我有以下用于图形的代码:barplot(as.vector(t(mat1[1,3:ncol(mat1)])),las=2)我想更改，以便将x轴替换为y = 2线；如下图所示，有效地将x轴向上移动了2个单位。

我需要从2开始的小节，以便:

值为3的条形图从y = 2行开始，并且上升到y = 3结束。

从y = 2行开始的值为0的小节，而从下降到y = 0

结束

如何使mat1的列名称成为我的x轴类别？

最佳答案

Barplot的条形总是从0开始。从每个y值中减去2(或我做的5)。将ylim设置为range(y值-5)。您将需要禁止使用yaxt =“n”绘制y轴。轴的xpd参数允许标签范围扩展到实际值范围以下。

 set.seed(231)
 tN <- table(Ni <- stats::rpois(100, lambda=5))
 tNshift <- tN-5
 barplot(tNshift, space = 1.5, yaxt="n", xaxt="n", ylim=range(tNshift))
 abline(0,0)
 axis(2, at= c(-5, pretty(tNshift)), labels=c(0, pretty(tNshift)+5), xpd=TRUE)