How to combine barchart and parameter estimate plot as one figure. ggplot2

Question

everyone, I encountered a problem, until now I don\'t resolve it. I want to make a plot as below, but I am just able to draw the right picture but the challenge is how to co