如何在 R 中替换 gap.barplot 中的轴答案

【问题标题】：How to replace axis in gap.barplot in R如何在 R 中替换 gap.barplot 中的轴
【发布时间】：2014-05-03 18:51:59
【问题描述】：

我一直试图弄清楚如何在 R 中替换 gap.barplot 中的 x 轴。首先，我有一个标签问题：

附上我的代码：

Samples     Conc    stdlo   stdhi
SampA        5000      0    0
SampB        100       0    11
SampC           80     0    20


rm(list=ls())
library(plotrix)

C.dat <- read.csv("G:/...../C.csv", head = TRUE)
C.lab = C.dat$Samples
C.conc = C.dat$Conc
C.lostd = C.dat$stdlo
C.histd = C.dat$stdhi

par(mar=c(6,6,5,2))

barplot = gap.barplot(C.conc, gap = c(200,1000), xlab = "Samples", 
ylab ="C Conentration (pg/mL)", main = "C in X and Y", las = 2,
xlim = c(0,4), ytics = c(0,1000,1500,5100), cex.lab = 1.5)

mtext("SampA", side = 1, at= 1.0, cex=1.0)
mtext("SampB", side = 1, at= 2.0, cex=1.0)
mtext("SampC", side = 1, at= 3.0, cex=1.0)

arrows(barplot,C.conc-0 ,barplot,C.conc+C.histd,code=2,angle=90,length=.1)

我最大的问题是当我在 gap.barplot 参数中坚持轴 = FALSE 时，它给了我一个警告并且没有产生任何情节。我想去掉“1 2 3”轴标签和刻度线。

另外，如果有人知道如何将 y 轴标签向左移动一点，那就太好了。

有什么建议吗？

【问题讨论】：

标签： r axis-labels plotrix

【解决方案1】：

你可以试试这个。我称您的数据框为df。

我在gap.barplot 通话中添加了xaxt = "n"。
来自?par： xaxt: A character which specifies the x axis type. Specifying "n" suppresses plotting of the axis.

然后axis 用于在at 位置添加带有labels 的x 轴，但没有刻度（tick = FALSE）。 y轴的标签加上mtext

library(plotrix)
par(mar=c(6,6,5,2))

gap.barplot(df$Conc, gap = c(200,1000),
            xlab = "Samples", ylab ="", main = "C in X and Y", las = 2,
            xlim = c(0, 4), ytics = c(0, 1000, 1500, 5100), cex.lab = 1.5,
            xaxt = "n")

axis(side = 1, at = seq_along(df$Sample), labels = df$Sample, tick = FALSE)
mtext("C Concentration (pg/mL)", side = 2, line = 4)

【讨论】：