8

如何在 r 中旋转箱线图的 x 轴标签?我知道要使用哪个代码,但我不能应用它:

text(**????**, par("usr")[3] - 0.25, srt = 45, adj = 1, labels = labels, xpd = TRUE)

我有问号的地方是什么变量?我创建了这个箱线图:

在此处输入图像描述

使用此代码:

soil=read.csv("soil_temp_boxplot.csv", header=TRUE, sep=";")    
tiff("soil_boxplot.tiff")
par(mar=c(5.5,3.5,0.5,0.5))
labels<-paste(c("RB-GL830-[16]-10","RB-GL830-[16]-30", "SB-GL834-[11]-10","SB-GL834-[11]-30", "RB-GL843-[17]-10","RB-GL843-[17]-30","SB-GL864-[12]-10","SB-GL864-[12]-30","SB-GL989-[10]-30", "RB-F844-[18]-10", "RB-F844-[18]-30", "SBB-F-864-[14]-10","SB-F991-[13]-10", "SB-F991-[13]-30"))
boxplot(soil$rb.gl.10.830.16, soil$rb.gl.30.830.16, soil$sb.gl.10.834.11, soil$sb.gl.30.834.11, soil$rb.gl.10.843.17, soil$rb.gl.30.843.17, soil$sb.gl.10.864.12, soil$sb.gl.30.864.12, soil$sb.gl.30.989.10, soil$rb.f.10.844.18, soil$rb.f.30.844.18, soil$sbb.f.10.864.14, soil$sb.f.10.991.13, soil$sb.f.30.991.13, yaxt="n", col=c("darkolivegreen1","darkolivegreen4","darkolivegreen1","darkolivegreen4","darkolivegreen1","darkolivegreen4","darkolivegreen1","darkolivegreen4","darkolivegreen1","burlywood2","burlywood4","burlywood2","burlywood2", "burlywood4"))
axis(1, labels = TRUE)
axis(2, c(0, 8, c(1, 2, 3, 4, 5,6,7)), las=1)
text(labels, par("usr")[3] - 0.25, srt = 45, adj = 1, labels = labels, xpd = TRUE)
mtext(2, text="Soil Temperature [°C]", line=2.2)
mtext(1, text="Location", line=4.5)
dev.off()
4

2 回答 2

13

text原始表达式之后的替代方法:

par(mar=c(6, 4.1, 4.1, 2.1))

labels <- paste(c("RB-GL830-[16]-10", 
                  "RB-GL830-[16]-30",
                  "SB-GL834-[11]-10",
                  "SB-GL834-[11]-30",
                  "RB-GL843-[17]-10",
                  "RB-GL843-[17]-30"))

boxplot(count ~ spray, data = InsectSprays,
        col = "lightgray", xaxt = "n",  xlab = "")

# x axis with ticks but without labels
axis(1, labels = FALSE)

# Plot x labs at default x position
text(x =  seq_along(labels), y = par("usr")[3] - 1, srt = 45, adj = 1,
     labels = labels, xpd = TRUE)

为什么要x = seq_along(labels)用于标签位置?xintext是放置标签的坐标向量。如果您查看?boxplot,您会发现该at参数是“给出箱线图绘制位置的数字向量 [...];默认为 1:n,其中 n 是箱数。” 因为我们没有at在调用中指定参数,所以boxplot将使用默认的“1:n 位置”。框的数量当然是您的解释变量的级别数,@Josh O'Brien 在他的回答中使用了它。为了向您展示另一种选择,我使用了您自定义的标签向量(当然,它的长度必须与因子级别的数量相同)。seq_along生成一个从 1 到length参数,对应于“默认为 1:n”的at位置。

旁注:您的数据似乎是“宽”格式。在 R 中的许多情况下,将数据设为“长”格式会更方便。在plot函数中,您只需要指定 x 变量(例如位置)和 y 变量(例如土壤温度),而不是为 x 的每个级别指定数据。 在此处输入图像描述

于 2013-09-07T08:16:29.347 回答
2

查看staxlabplotrix 包中的函数,它使这个(和一个替代方案)相当简单。

于 2013-09-07T17:35:18.180 回答