原標題：R實現地理位置與經緯度相互轉換

本實例要實現目標通過輸入城市名或者地名，然后找出其經度緯度值，以及通過可視化展現其線路流向以及周邊地圖展示

address_list數據：

山西省太原市小店區親賢北街77號

貴州省貴陽市云巖區書香門第B棟3單元

北京市通州區神樹商業街168號

貴州省貴陽市南明區興關路51

北京市東城區長巷二條乙5號

山西省太原市杏花嶺區北肖墻12號

北京

北京市通州區

北京市的的的的的

天津市武清區

1、生成可視化地圖

library(devtools)

#install_github('lchiffon/REmap')

library(REmap)

city_vec = c( "北京", "Shanghai", "廣州")

get_city_coord( "Shanghai")

get_geo_position (city_vec)

set.seed( 125)

origin = rep( "杭州", 5)

destination = c( '臺州', '麗水', '金華', '溫州', '鄉寧')

dat = data.frame(origin,destination)

out= remap(dat,title = "REmap實例數據",subtitle = "theme:Dark")

plot( out)

mapNames( "杭州")

結果：

2、根據地名，生成其經緯度

#############使用百度API######################

############地理位置→經緯度###################

##############################################

library(REmap)

#library(RCurl)

#library(rjson)

#get_city_coord('杭州')

#導入地址列表

address

address

head(address)

#建立備用向量，包括空向量及百度地圖api秘鑰

baidu_lng

baidu_lat

ak

#加載包

library(rjson)

library(RCurl)

location

#循環解析過程

for(location in address) {

#生成規則的url地址(具體參數可參考Geocoding API文檔)

url

#利用URLencode()轉換為可解析的URL地址

url_string

#通過readLines讀取URL地址，并解析JSON格式的結果

json

geo

#在解析結果中提取經緯度

lng

lat

#存儲到已經建好的字段中

baidu_lng

baidu_lat

}

#整理結果

result

result

結果(對應address_list文件位置經緯度)：

3、獲取輸入名字的百度地圖展現

library(devtools)

#install_github('badbye/baidumap')

#install_github('lchiffon/REmap')

library(baidumap)

library(ggmap)

## Loading required package: ggplot2

#獲取浙江中醫藥大學的地圖信息

####http://www.gpsspg.com/maps.htm

q

ggmap(q) #繪制地圖

q

ggmap(q) #繪制地圖

結果：

華青蓮日常點滴，方便自己，成長他人！！！

——————————————返回搜狐，查看更多

責任編輯：

總結

以上是生活随笔為你收集整理的js 封装经纬度成json_R实现地理位置与经纬度相互转换的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。