R графика: сделать два графика ближе друг к другу на графике

Question

У меня есть график с кодом:

yvalue = c(100, -100, 50, 0)
xvalue = c(1, 1, 2, 2)
gmin = c(-100, 0)
gmax = c(100, 50)
xarrow = c(1, 2, 3, 4)
gplot = plot(xvalue, yvalue, xaxt="n", main="Just a graph", xlab="Groups", ylab="y-value")
xvaluenames = c("Group 1", "Group 2", 1, 2)
axis(1, at = 1:length(xvalue), labels = xvaluenames)
arrows(x0=xarrow, y0=gmin, x1=xarrow, y1=gmax, length=0)
abline(h=0)

Я хочу, чтобы участки Группы 1 и Группы 2 были ближе друг к другу. Больше похоже на:

Кто-нибудь советует, как их сблизить?

Answer 1

В качестве дополнительного параметра к вашему вызову graph() вы можете добавить: xlim = c(x1,x2), где x1 и x2 - пределы вашей видимой оси x.

вы используете x-координаты 1 и 2, вы можете использовать xlim=c(0.5,2.5)