数据如下
start_date counts trend season  remainder   anomaly
                        
2017-05-01  2     0.225     -0.232       2.01      Yes   
2017-05-02  0     0.197     -0.148    -0.0491       No     
2017-05-03  0     0.170     -0.231     0.0615      No     
2017-05-04  0     0.142      0.0830   -0.225        No     
2017-05-05  1     0.115      0.0527    0.833        No     
2017-05-06  0     0.104      0.139    -0.244        No     


我将数据用基于ggplot包的autoplot()的方式绘制成了如下的样子
observation（第一个面板）trend（第二个面板）
season（第三个面板）
remainder（第四个面板）
求教各位大神：有没有基于ggplot2包的方法将remainder(第四个面板）中的部分数据（anomally为Yes的点）用红圈圈出
（在数据中，有专门的一列表示数据是否异常异常，如果异常值为“Yes"，非异常为”No",我想将异常的点用红圈圈出。）
r语言小白求助各位大神！！！！