Correctly place geom_text labels in forest plot with "fill" parameter in ggplot2

Here is a link to the solution.