ggplot(myepidat) + geom_map(aes(map_id = id, fill = 各地药费用), color = "white", map = mymapd) +
+     geom_point(data = temp,aes(x = long, y = lat,fill = NULL),
+                colour = rgb(red = 165, green = 165, blue = 165, max = 255)) +
+     geom_dl(data = temp,aes(x = long, y = lat,label = NAME),
+             list('last.points',cex = 0.7, hjust = 1))+#设置省会标签，让省会标签随机移动一点距离以免过分重叠
+     scale_fill_gradient(name="",
+                         high = rgb(red = 254, green = 67, blue = 101, max = 255),
+                         low = rgb(red = 162, green = 162, blue = 145, max = 255),
+                         breaks = c(0, 103, 153, 153, 202, 317, 581)) +
+     expand_limits(x = c(73, 136), y = c(6, 54)) + coord_map()+
+     theme_opts +
+     theme(legend.text=element_text(size=10))
Error in ggplot2::layer(data = data, mapping = mapping, geom = GeomDl,  :
  must specify method= argument