R stat 定义标签在 x 上的角度，用于分配带有索引值的标签文本

Question

我正在完成我的脚本，但我无法为 x 标签设置角度。我想将它用于特定索引位置的数据：

输入：

xlabel <- (0,100,200,250,336)

xlabel.popis <- ("TATA","MAMA","OND","KOKO","LOLO")

输出：将在 x 轴上的特定 xlabel 位置绘制 xlabel.popis（x 轴是索引线 (0..500)）并且 xlabel.popis 将进行垂直旋转。

我试过了：

plot(read.table(files2[i],header=F,sep="\t")$V7,main=file_bez2[i], axes=FALSE)
xlabel <- (0,100,200,250,336)
xlabel.popis <- ("TATA","MAMA","OND","KOKO","LOLO")
axis(1, at=seq_along(xlabel),labels=as.character(xlabel.popis, las=2, cex.label=90))

或者我尝试没有轴但 mtext(as.character(xlabel.popis),side=1,line=1.1,at=xlabel,srt=90) 什么都没用，你能帮我吗，使用 axis definition.And par() 定义对我来说会更好也不起作用。非常感谢

Answer 1

我认为您需要在调用 axis 后使用 text 函数添加标签。

示例：

xlabel <- c(0,100,200,250,336)
xlabel.popis <- c("TATA","MAMA","OND","KOKO","LOLO")

plot(range(xlabel), c(1,1), t="l", xaxt="n", xlab="")
axis(1, at=xlabel, labels=FALSE)
text(x=xlabel, y=par()$usr[3]-0.1*(par()$usr[4]-par()$usr[3]),
labels=xlabel.popis, srt=45, adj=1, xpd=TRUE)

如果您只想旋转 90°，请考虑 las 参数：

plot(range(xlabel), c(1,1), t="l", xaxt="n", xlab="")
axis(1, at=xlabel, labels=xlabel.popis, las=2)

R stat 定义标签在 x 上的角度，用于分配带有索引值的标签文本

R stat Define angle of labels on x for assign label text with index values

plot

label

r

示例：