различных меток для оси х

Question

у меня есть этот данные и сюжет

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) 

Я хотел бы Подмножество оси й на две этикетку с именем 'а + Ь «с + d» и этикетками

заранее спасибо

Answer 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 - установить вертикальное положение и 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) и х-значение, при котором вы пишете метку оси (в mtext).