如何用ggplot2绘制带差值百分比标注的分层彩色柱形图

我需要复现展示各城市实际工资差异的图表，具体要求如下：

• X轴为字符型变量Provincia（城市名称，原数据为City Code）
• Y轴为实际工资数值
• 拥有两个实际工资变量：Real Wage 1（始终大于Real Wage 2），蓝色柱形代表Real Wage 1，橙色部分代表Real Wage 1与Real Wage 2的差值相对Real Wage 1的百分比
• 需要在橙色部分标注该差值百分比

我的数据集如下：

# database
City Code   Real Wage 1    Real Wage 2
91          530            500
92          520            490
93          410            390
94          300            270
95          205            200
96          501            434
97          700            678
98          800            730   
99          900            820
100         740            700
101         590            560 
102         420            400
103         340            320
104         290            270   
105         120            100

目前不确定ggplot2能否叠加两个变量的柱形，也不清楚如何在橙色部分标注差值百分比。

更新1：感谢@Chamkrai提供的代码，请问如何像示例图那样在每个柱形内标注差值百分比？

更新2：感谢@r2evans提供剩余代码。

更新3：我已将City Code替换为字符型变量Provincia（存储城市名称）。

更新4：问题解决了！我应该先使用select再执行mutate操作！感谢所有人！

内容的提问来源于stack exchange，提问作者io_boh