iT邦幫忙

2018 iT 邦幫忙鐵人賽
DAY 14
2
Data Technology

你都在公司都在幹啥R? R語言資料分析經驗分享系列 第 14

【14】當老闆突然問:對了,有沒有什麼辦法可以分析地址啊?可以顯示在地圖上的那種。

  • 分享至 

  • xImage
  •  

這次要介紹的是分析地址,在R 的套件當中,有個非常有名的套件叫做ggmap ,後面幾天我會一一講解之前我用了哪些功能,首先一樣,你必須要先安裝相關套件。

#install.packages("ggmap")
library(ggplot2)
library(ggmap)

安裝完成後,先用下列的程式碼當作hello world。

google_map <- get_googlemap()
ggmap(google_map)

https://ithelp.ithome.com.tw/upload/images/20171231/201072992HWaMuyrTz.png

接下來,我們加一些參數,把範圍縮小到雙北地區,center 是這次畫地圖的中心點經緯度座標,zoom是放大等級,maptype是地圖種類,以google map 來說,satellite是衛星圖,terrain
是地形圖,roadmap主要是街道圖,這邊範例我們用衛星圖來畫。

google_map <- get_googlemap(center=c(121.52311,25.04126), zoom=12, maptype='satellite')
ggmap(google_map)

https://ithelp.ithome.com.tw/upload/images/20171231/20107299dRa7O6zc6L.png

再來要介紹的,是在地圖上標記位置,這時可以結合ggplot 一起使用,首先我先創了20 個經緯度在台北附近的座標。

LatLngData <- data.frame(
Lat = runif(20, 24.96, 25.11),
Lng = runif(20, 121.44, 121.60))

https://ithelp.ithome.com.tw/upload/images/20171231/20107299n507QVFjN6.png

然後搭配ggplot 畫出紅點。

google_map <- get_googlemap(center=c(121.52311,25.04126), zoom=12, maptype='satellite')
ggmap(google_map) +
    geom_point(data=LatLngData, aes(x=Lng, y=Lat), colour='red')

https://ithelp.ithome.com.tw/upload/images/20171231/20107299QqrPhktXPU.png

以上就是ggmap的基礎篇,之後我們會再結合google map 的其他API 應用,今天也是2017 的最後一天,祝大家新年快樂^^

ref
day14原始碼


上一篇
【13】當老闆很想瞭解:既然現在有了這些農產品行情資料,那你可以幫我找今年一月中,平均上價高於200且交易量前幾名的作物是哪些嗎?
下一篇
【15】當老闆突然又問:你畫的地點都是用經緯度座標畫的,可是我們會員資料庫存的是地址啊,你可以用地址在地圖上畫點嗎?
系列文
你都在公司都在幹啥R? R語言資料分析經驗分享30
圖片
  直播研討會
圖片
{{ item.channelVendor }} {{ item.webinarstarted }} |
{{ formatDate(item.duration) }}
直播中

尚未有邦友留言

立即登入留言