r - ggplot2のコロプレスマップにポイントを追加

Question

私はハドリーウィッカムの次の例を見ていますggplot2：

library(ggplot2)
library(maps)
states<-map_data("state")
arrests<-USArrests
names(arrests)<-tolower(names(arrests))
arrests$region<-tolower(rownames(USArrests))

chloro<-merge(states, arrests, by="region")
chloro<-chloro[order(chloro$order), ]
qplot(long, lat, data=chloro, group=group, fill = assault, geom="polygon")

次に、いくつかの注目すべき米国の都市のポイントをマップに追加したいと思いますが、追加できませんでした。私はもう試した：

base_map<-qplot(long, lat, data=chloro, group=group, fill = assault, geom="polygon")
base_map + qplot(long, lat, data=us.cities) + borders("state", size=.5)

しかし、次のエラーが発生します。

Error in p + o : non-numeric argument to binary operator
In addition: Warning message:
Incompatible methods ("+.ggplot", "Ops.data.frame") for "+""

これらのポイントを追加するにはどうすればよいですか？

Answer 1

これは私にとってはうまくいくようです：

base_map + 
    geom_point(aes(long, lat,fill = NULL,group = NULL), size = 1,data=us.cities) + 
    borders("state", size=.5)

このバージョンのプロットを作成するために行ったように、HIとAKの都市を除外することもできます。