将 xaxis 标签更改为特定字母 R答案

【问题标题】：Change xaxis label to specific letters R将 xaxis 标签更改为特定字母 R
【发布时间】：2016-06-22 18:05:17
【问题描述】：

我在 R 中画了很多图，我的部分代码如下所示：

plot(x=0,y=0, type="n", ylim=c(0,250), xlim=c(0,8), bty="n", main = "Line 20 male 3 sec rep 2", 
     xlab = "Concentration", ylab = "MM above buttom")
fc <- levels(dat20m2$Conc)
for(i in 1:length(fc)){
  tmp <- dat20m2[dat20m2$Conc==fc[i],]
  points(y=tmp$t30.sum,x=rep(i,length(tmp$t30)))
  points(y=mean(tmp$t30.sum),x=i,col="red")
}
abline(lm(t30.sum~as.integer(Conc),data=dat20m2), lty=2)

我的 x 轴从 0:8 开始，但我希望它是 A、B、C、D、E、X、Y，我可以使它与字母表一起使用，但是当我想跳一些字母时陷入困境。有人可以帮我吗？

【问题讨论】：

你能提供一个可重现的例子吗？很难辨别你在这里尝试的是什么。

标签： r graph label axes

【解决方案1】：

plot(x=0,y=0, type="n", ylim=c(0,250), xlim=c(0,8), bty="n", main = "Line 20 male 3 sec rep 2", 
     xlab = "Concentration", ylab = "MM above buttom", xaxt="n")

## added xaxt="n"
## and the axis code below
axis(1,at=0:7,labels=c("0","A","B","C","D","E","X","Y"))
fc <- levels(dat20m2$Conc)
for(i in 1:length(fc)){
  tmp <- dat20m2[dat20m2$Conc==fc[i],]
  points(y=tmp$t30.sum,x=rep(i,length(tmp$t30)))
  points(y=mean(tmp$t30.sum),x=i,col="red")
}
abline(lm(t30.sum~as.integer(Conc),data=dat20m2), lty=2)

我从here 得到了答案，我通过添加双井号所描述的两个部分来修改您的代码。希望这会有所帮助。

【讨论】：