国のqmapに複数行を描く

Question

thisのような複数の接続をマップしたいが、はるかに正確なレベル（国）にマップしたいと思う。そうするために、私はqmapパッケージとリンクで使用されているパッケージを組み合わせたいと思いますが、うまくいきません。誰もがsomのアイデアを得た？

私はすでにこのコードをしようとしているが、それは同様にうまくいかない：

map = qmap(location='Berlin', zoom = 5) 
berlin = c(geom_polygon(aes(long,lat,group=group), size = 0.1, colour= "#090D2A", 
       fill="#090D2A", alpha=0.8, data=map)) 

は、私は次のエラーを取得する： Error: ggplot2 doesn't know how to deal with data of class gg/ggplot

誰もが、なぜいくつかのアイデアを得ましたか。 :-(

Answer 1

エラーは、geom_polygon（「data=map」）のデータ引数に型ggplotのオブジェクトを渡していることを示しています。しかし、geom_polygonは通常型data.frameのオブジェクトを期待しています。?geom_polygonを参照してください。

あなたはスターターとしてこの例を取ることができる：あなたの返信用

library(ggmap) 
library(ggplot2) 
library(geosphere) 
map <- qmap(location='Berlin', zoom = 5) 
n <- 50L 
m <- matrix(c(
10,53,20,53, 
3,47,23,55),ncol=4,byrow=T) 
m <- gcIntermediate(m[,1:2],m[,3:4], n = n) 
m <- as.data.frame(cbind(do.call(rbind, m), id=rep(seq_along(m), each = n))) 
map + 
    theme_minimal() + 
    geom_path(
    aes(lon,lat,group=id), 
    data=m, 
    arrow = arrow(ends="both"))