ggplot2 を使用してコロプレス マップを作成しています。データ フレームに基づいてさまざまな陰影を付けてマップをプロットできますが、州と州の犯罪数にラベルを付けたいと思います。geom_text を試しましたが、「エラー: geom_text には次の美学が必要です: x, y」と表示され続けます。
これは、コロプレスをプロットするためのコードです
ind <- readShapeSpatial("./IND_adm/IND_adm1.shp")
ind <- fortify(ind, region = "NAME_1")
# read in data frame with number of crimes per Year.
#Plot choropleth map
ggplot(data = crimeSet) +
geom_map(data = crimeSet, aes(map_id = state, fill = yearlyCrimes), map = ind) +
expand_limits(x = ind$long, y = ind$lat) +
scale_fill_gradient2(low = "pink",
mid = "red", midpoint = mid, high = "brown", limits = c(n, m)) +
ggtitle('Total Crimes')
試しgeom_text(data=crimeset,aes(label=state))
ましたが、上記のエラーが発生します