2

新しいコロプレス パッケージを使用して、何らかの指標 (職場で事故を経験した人口の割合) に従って、ヨーロッパ諸国のコロプレス マップを作成しようとしています。これは、解決する必要がある 2 つの問題を示す再現可能な例です。

a<-c(4.1,2.5,0.4,6.4,1.4,1.8,3.8,1.3,2.3,8.4,5.2,1.9,0.8,1.5,2.1,1.2,3.8,1.4,3.1,0.8,4.0,1.3,4.8,2.6,2.8,2.3,3.1,2.5)
    target<-c("austria","belgium","bulgaria","switzerland","cyprus","czech republic","denmark",
"estonia","spain","finland","france","greece","croatia","hungary","ireland","italy",
"lithuania","luxembourg","latvia","norway","poland","portugal","romania","sweden",
"slovenia","slovakia","turkey","united kingdom")
datas<-data.frame(region=target,value=a)
datas$region<-as.character(datas$region)


install.packages("choroplethr")
install.packages("choroplethrMaps")
library(choroplethr);library(choroplethrMaps)
data(country.map)
data(country.regions)

country_choropleth(datas,legend="%",num_colors=1,zoom=target)

ヨーロッパ全体 1) 私が遭遇した最初の深刻な問題は、一部の国 (フランスなど) に属するこれらの余分な領域であり、マップがヨーロッパ全体に拡大されません。zoom パラメーターに、データ フレームに存在する国のベクトル全体を指定しました。私が試みた場合country_choropleth(datas,legend="%",num_colors=1,zoom="switzerland") 、スイスでのみズームされ スイス ます 問題は、フランスなどの国から届きます country_choropleth(datas,legend="%",num_colors=1,zoom="france") ここに画像の説明を入力

したがって、ヨーロッパ諸国に属し、ヨーロッパ地域にない地域を解放する方法が必要です。何か案は？

2）私が抱えている2番目の問題はcountry.regions$region、パッケージで使用できる利用可能な地域が存在する場所の中で、マルタが欠落していることです。マップ上の単一のブロットですが、それでもスキップできません。国を追加する方法はありますか？

4

1 に答える 1

2

おそらく、この 2 つの質問を作成する必要があります。choropleth pkg の出力を他のggplotレイヤー/美学で拡張できます。「ズームイン」して適切な投影の近くで使用するには、次のことができます。

library(ggplot2)

gg <- country_choropleth(datas,legend="%",num_colors=1,zoom=target)
gg <- gg + xlim(-31.266001, 39.869301)
gg <- gg + ylim(27.636311, 81.008797)
gg <- gg + coord_map("lambert", lat0=27.636311, lat1=81.008797)
gg

ここに画像の説明を入力

（そして、バウンディングボックスの座標をいじって、少しきつくすることができます）\

于 2015-05-06T13:25:26.550 に答える