CSVデータから地図を作成しようとしています。ただ空白の地図を取得するwitrhデータポイントなし

Question

ここに私がまとめた小さなスクリプトがあります。

MyData <- read.csv(file="http://www.grex.org/~ev/breweries.csv", header=TRUE, sep=",") 

library(DT) 
datatable(MyData[,c("name","address1","address2","city","state","code","country")]) 


library(leaflet) 
map <- 
    MyData %>% 
    leaflet() %>% 
    addTiles() %>% 
    addCircles(~name, ~address1, ~address2, ~city, ~state, ~country, radius = 200, color="blue", opacity = 0.8) 
map 

データがダウンロードされ、正常であるようです。

しかし、何も私のマップ上に表示されません。

私は下のリンクからの例に従うことをしようとしています。それは超シンプルなようですが、私は批判的なものが欠けているようです。

https://blogs.msdn.microsoft.com/visualstudio/2016/03/22/introducing-r-tools-for-visual-studio-3/

ここで誰も私が間違ってやっている任意のアイデアを持っていますか？

ありがとうございました。

Answer 1

addCirclesは、各醸造所が地図上のポイントをプロットするための緯度と経度の座標を必要とします。この場合、あなたは（あなたが醸造所のデータをダウンロードし、同じWebページから）breweries_geocodeデータセットからそれらを得ることができ、MyDataにマージ：

MyData2 <- read.csv(file="http://www.grex.org/~ev/breweries_geocode.csv", header=TRUE, sep=",") 

map <- 
    MyData %>% 
    left_join(MyData2, by=c("id")) %>% 
    leaflet() %>% 
    addTiles() %>% 
    addCircles(~longitude, ~latitude, popup=~name, radius = 200, color="blue", opacity = 0.8) 

map