REmap 是一个基于 Echarts2.0 http://echarts.baidu.com/echarts2/ 的一个 R 包。主要的目的是为广大数据玩家提供一个简便的，可交互的地图数据可视化工具。目前托管在 github，https://github.com/lchiffon/REmap。

使用如下步骤安装：

library(devtools)install_github('lchiffon/REmap')

REmap 目前更新到 V0.3，提供百度迁徙，分级统计，百度地图，热力图等功能的实现。

提示: 请使用 Chrome 或者 Firefox 来作为默认浏览器

最后要声明的一点：这个包的目的是简化使用和学习的流程，如果你是一个好学的 geek，请深入的学习 Echarts！

特性

使用 Echarts2.0 封包，地图绘制使用的是 SVG 图形
采用百度 API 来自动获取城市的经纬度数据
支持 Windows！

使用向导

获取经纬度

获取经纬度的函数是基于 BaiduAPI 的一个获取地理位置的功能。这个函数不仅是 REmap 下的一个功能，实际上，你也可以用它来抓取城市经纬度数据：

基本函数:

get_city_coord 获取一个城市的经纬度
get_geo_position 获取一个城市向量的经纬度

library(REmap)city_vec = c("北京","Shanghai","广州")get_city_coord("Shanghai")## [1] 121.47865  31.21562get_geo_position (city_vec)##         lon      lat     city## 1  116.6212 40.06107     北京## 2  121.4786 31.21562 Shanghai## 3  113.3094 23.39237     广州

注：windows 用户会看到 city 一列为 utf-8 编码，可以使用get_geo_position (city_vec2)$city查看列向量的信息。(我能说我最好的建议是换 Mac 么？)

绘制迁徙地图

绘制地图使用的是主函数remap

remap(mapdata, title = "", subtitle = "",      theme =get_theme("Dark"))

mapdata 一个数据框对象，第一列为出发地点，第二列为到达地点
title 标题
subtitle 副标题
theme 控制生成地图的颜色，具体将会在get_theme部分说明

set.seed(125)origin = rep("北京",10)destination = c('上海','广州','大连','南宁','南昌',                '拉萨','长春','包头','重庆','常州')dat = data.frame(origin,destination)out = remap(dat,title = "REmap示例数据",subtitle = "theme:Dark")plot(out)

该地图会写成一个 html 文件，保存在电脑里面，并通过浏览器打开该文件。以下的方式都可以看到这个地图：

## Method 1remap(dat,title = "REmap实例数据",subtitle = "theme:Dark")## Method 2out = remap(dat,title = "REmap实例数据",subtitle = "theme:Dark")out## Method 3plot(out)

个性化地图

正如之前所说的，为了简化学习和使用的流程，REmap 并没有封装太多的参数。（真的不是我懒）如果想更个性化地调整 Echarts 的参数，请移步 Echarts 的官方文档 http://echarts.baidu.com/doc/doc.html

REmap 中get_theme提供了迁徙地图中常用颜色的调整：

get_theme(theme = "Dark", lineColor = "Random",  backgroundColor = "#1b1b1b", titleColor = "#fff",  borderColor = "rgba(100,149,237,1)", regionColor = "#1b1b1b")

theme 默认主题，除了三个内置主题，可以使用 “none” 来自定义颜色
- a character object in (“Dark”, “Bright”, “Sky”, “none”)
lineColor 线条颜色，默认随机，也可以使用固定颜色
- Control the color of the line, “Random” for random color
backgroundColor 背景颜色
- Control the color of the background
titleColor 标题颜色
- Control the color of the title
borderColor 边界颜色（省与省之间的信息）
- Control the color of the border
regionColor 区域颜色
- Control the color of the region

颜色可以使用颜色名（比如’red’, ‘skyblue’等），RGB（”#1b1b1b”, “#fff”）或者一个 rgba 的形式（”rgba(100,100,100,1)“），可以在这里找到颜色对照表。

默认模板：Bright

## default theme:"Bright"set.seed(125)out = remap(dat,title = "REmap实例数据",subtitle = "theme:Bright",            theme = get_theme("Bright"))plot(out)

更改线条颜色

## set Line color as 'orange'set.seed(125)out = remap(dat,title = "REmap实例数据",subtitle = "theme:Bright",            theme = get_theme("None",                             lineColor = "orange"))plot(out)

更改其他颜色

## Set Region Colorout = remap(dat,title = "REmap实例数据",subtitle = "theme:Bright",            theme = get_theme("None",                              lineColor = "orange",                              backgroundColor = "#FFC1C1",                              titleColor = "#1b1b1b",                              regionColor = '#ADD8E6'))plot(out)

参考资料

本站仅提供存储服务，所有内容均由用户发布，如发现有害或侵权内容，请点击举报。