x-axis starting value for diverging plot

Question

How can I change the "x-axis starting value" from the diverging bar chart below (extracted from here), so that the vertical axis is set at 25 instead of 0. And therefore the bars are drawn from 25 and not 0.

For instance, I want this chart:

To look like this:

---

EDIT It it not the label I want to change, it is how the data is plotted. My apologies if I wasn't clear. See example below:

Another example to make it clear:

Answer 1

You can provide computed labels to an (x-)scale via scale_x_continuous(labels = function (x) x + 25).

If you also want to change the data, you’ll first need to offset the x-values by the equivalent amount (in the opposite direction):

Example:

df = tibble(Color = c('red', 'green', 'blue'), Divergence = c(5, 10, -5))
offset = 2

df %>%
    mutate(Divergence = Divergence - offset) %>% 
    ggplot() +
    aes(x = Divergence, y = Color) +
    geom_col() +
    scale_x_continuous(labels = function (x) x + offset)