我有这个数据和情节
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”标签的标签
提前致谢
我有这个数据和情节
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”标签的标签
提前致谢
在您的情况下,您可以简单地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
是设置垂直位置和at
x轴上的位置。
编辑:要增加两组之间的距离,您可以这样做(可能有一种更清洁的方法,但这是我唯一能想到的方法):
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))
的参数at
是stripchart
要摆弄的参数,但是您必须修改绘图限制 ( xlim
) 和写入轴标签的 x 值 (in mtext
)。