Hi folks! I am trying to overlay some labels over dodged points but geom_text() does not appear to be respecting the position = position_dodge(width = 1) I'm providing.
Am I just missing something or this is a bug and I should file an issue on GitHub? Wanted to check first that it's not a user error 
reprex_data <- tibble::tribble(
~y, ~x, ~z,
1, "a", "1",
2, "a", "2",
3, "b", "1",
4, "b", "2"
)
ggplot(reprex_data, aes(x = x)) +
geom_pointrange(
aes(y = y, ymin = y - 1, ymax = y + 1, color = z),
position = position_dodge(width = 1)
) +
geom_text(
aes(y = y, label = z),
position = position_dodge(width = 1),
color = "black"
) +
theme_minimal()
Output:

Desired, with the "z" labels on top of the points:
