Переместить ось x, чтобы пересечь ось y ниже 0 в R barplot

Question

Я делаю штрих-график с использованием ggplot2 и хотел бы, чтобы ось x пересекала ось y в -1, а не 0. Я открыт для использования других методов в R для создания фигуры, если невозможно заставить ось x сдвинуться вниз в ggplot.

Графирование новой строки в -1 (а не на оси) или преобразование данных, как было предложено в ответах на аналогичный запрос, было бы неприемлемо для этой презентации.

Answer 1

вы можете найти код, чтобы переместить точку пересечения оси абсцисс на этом посту: X and Y axis intersect at 0

Я адаптированное это так, чтобы переместить ось у вниз:

plot(x,y, xlim=c(-1.5, 1.2), axes=FALSE, pch=19, ylim=c(-3,8)) 
axis(1, pos=-1) 
axis(2, pos=0)