0

Choroplethr パッケージを使用して作成したコロプレス マップに、ポリゴンを含むシェープファイルを追加したいと考えています。コロプレス マップは、次のコードで作成されました。

choro=county_choropleth(Change, title= "WeeklyChange", state_zoom = continental_us,reference_map = F)+ scale_fill_manual(values=c("-3"="red4","-2"="red3","-1"="red1", "0"="snow","1"="greenyellow","2"="green","3"="green3"))

plot(choro)

gold= readShapePoly("Gold") gold_df= fortify(gold) land= ggplot(data= gold_df,aes(x=long, y= lat, group=group))+ geom_polygon(colour="gold3")

plot(gold)

両方のオブジェクトが正しく表示されますが、コロプレス マップにゴールド プロットを重ねることができません。 コロプレスとゴールドマップ

前もって感謝します！

4

1 に答える 1

0

私を助けてくれたアリ・ラムスタインに感謝します。以下は、ポリゴンを追加するコードです

# Create Choropleth Map
`choro=county_choropleth(Change, title= "WeeklyChange",
state_zoom = continental_us,reference_map = F)+
scale_fill_manual(values=c("-3"="red4","-2"="red3","-1"="red1",
"0"="snow","1"="greenyellow","2"="green","3"="green3"))`

`#Import shapefile polygons
gold= readShapePoly("Gold")`

`#Create dataframe for ggplot
gold_df= fortify(gold)`

`#Combine Choropleth Map and shapefile dataframe
choro+geom_polygon(data= gold_df,aes(x=long, y= lat,group=group),fill="gold3")`
于 2016-03-11T17:45:34.723 に答える