1

我有这个数据和情节

mydata <- data.frame(a=c(1:5),b=c(6:10),c=c(11:15),e=c(16:20))
plot <- stripchart(mydata, method="jitter", vertical=T,main='plot',pch=19)

我想将 x 轴子集为两个名为“a+b”和“c+d”标签的标签

提前致谢

4

1 回答 1

1

在您的情况下,您可以简单地mtext在第 1 面使用:

mydata <- data.frame(a=c(1:5),b=c(6:10),c=c(11:15),d=c(16:20))
plot <- stripchart(mydata, method="jitter", vertical=T,main='plot',pch=19)
mtext(c('a+b','c+d'),side=1,line=3,at=c(1.5,3.5))

参数line是设置垂直位置和atx轴上的位置。

编辑:要增加两组之间的距离,您可以这样做(可能有一种更清洁的方法,但这是我唯一能想到的方法):

mydata <- data.frame(a=c(1:5),b=c(6:10),c=c(11:15),d=c(16:20))
plot <- stripchart(mydata, method="jitter", vertical=T, main='plot',pch=19, 
                   at=c(1,2,4,5),xlim=c(0,6))
mtext(c('a+b','c+d'),1,line=3,at=c(1.5,4.5))

的参数atstripchart要摆弄的参数,但是您必须修改绘图限制 ( xlim) 和写入轴标签的 x 值 (in mtext)。

于 2013-12-19T12:11:42.450 回答