ggplot2: столбцы между отметками оси X

Question

Данные, которые мне нужно визуализировать, содержат пассажирские грузы в поезде между 4 станциями.Данные предоставляются в упорядоченном виде, т.е.Между станциями A и V в поезде находится 432 пассажира, между V и B 543 и так далее.В примере кодирования я нанес на график данные с помощью ggplot2.

library(tidyverse)

df <- tribble(~Station, ~Passengers,
              "A", 432,
              "V", 543,
              "B", 435,
              "Q", 0)

df$Station <- factor(df$Station, levels=unique(df$Station))

ggplot(data = df, aes(x = Station, y = Passengers)) + 
  geom_bar(stat = "identity")

Проблема: я хотел бы расположить отметки оси X иНазвания станций между барами.Цель - сдвинуть бары на 50% вправо.

Answer 1

Мы можем использовать position_nudge для регулировки баров:

ggplot(data = df, aes(x = Station, y = Passengers)) + 
  geom_bar(stat = "identity", position = position_nudge(x = 0.5))