REmap分享

2016-07-30 幻灯片保存

基本介绍

如何获取帮助

百度/google
issue
stackoverflow

其他功能介绍

knitr

remap.init()
## 绘制地图
p = remap(demoC)
## knitr展示
knitrREmap(p,local=F)

shiny

D:/Program Files/R/R-3.2.0/library/REmap/shiny/shinyBmap

1
2
3

library(REmap)
library(shiny)
runApp(system.file("shiny","shinyBmap", package = "REmap"))

个性化定制

options(browser =getOption("viewer"))
data(demoC)
## Test for Bmap
geoData  = get_geo_position(unique(demoC[demoC==demoC]))
# this may take some time,be patient~
remapB(markLineData = demoC,geoData = geoData)
remapB(markLineData = demoC,geoData = geoData,
       markLineTheme = markLineControl(color = 'red'))
data(demoC)
demoC$tooltip = sample(letters,nrow(demoC))
remapB(markLineData = demoC,geoData = geoData,
       markLineTheme = markLineControl(color = 'red'))
newdata = data.frame(a = demoC[,2],
                     color = c(rep("blue",5),rep("red",5)))
remapB(markPointData = newdata,
       color = "Blue",geoData = geoData)
newdata$symbolSize = 1:10
remapB(markPointData = newdata,
       color = "Blue",geoData = geoData)
newdata$tooltip = paste(newdata$a,newdata$symbolSize,sep = ":")
remapB(markPointData = newdata,
       color = "Blue",geoData = geoData)
data(chinaIphone)
## markLineControl
mapdata = chinaIphone
geoData  = get_geo_position(unique(demoC[demoC==demoC]))
out = remapC(data = mapdata,
             color = c("white","white"),
             theme=get_theme("none","white","white","white",'white'),
             markPointData = demoC[,2],
             markPointTheme = markPointControl(
               symbol = "image://http://lchiffon.github.io/reveal_slidify/pic/ghost.png",
               symbolSize = 50,
               effectType = 'bounce' ),
             geoData = geoData)
out