在学习《ggplot2：数据分析与图形艺术》的“5.10 添加图形注解”的时候遇到问题，我是对着书码的代码，不知道错哪儿了，求指教。
我的代码如下：
> unemp2+geom_rect(aes(NULL,NULL,xmin=start,xmax=end,fill=party),
+                  ymin=yrng[1],ymax=yrng[2],data=presidential,alpha=0.2)+
+   scale_fill_manual(values=c("blue","red"))

然后运行的时候提示错误：
Error in f(..., self = self) : could not find function "is.waive"