Rで地図を描く時便利な「maps, leaflet, NipponMap」
地図を使ったデータの可視化って結構厄介でめんどくさい。
でも情報としては大変に伝わりやすいし、議論も行いやすい。
Rで地図を描くためのパッケージをちょこっと調べたところ「ggmap」が便利な様子だが...
ggmap、クレジットカードが必要
library(ggmap)
get_map("Durham North Carolina", maptype = "roadmap", zoom = 10)
library(ggmap)
get_map("Durham North Carolina", maptype = "roadmap", zoom = 10)
APIkeyが必要。
別にお金はかからないみたいだけど無用に使われないようになのかクレジットカードの登録が必要になる
API keyめんどくさくね?
そこで「maps」
library(maps)
#help(package='maps')
map()
library(maps)
#help(package='maps')
map()
太平洋中心世界地図が表示できる
国コード指定でzoomしたり
map('usa')
描画エリアに枠を付けたり
map('japan')
map.axes()
map('usa')
box()
日本の情報も確認したくなったらmapdataを追加インストールする
library(mapdata)
map('japan')
map.axes()
interiorが境を表示するオプション
map("japan", interior = FALSE)
map("japan", boundary = FALSE, lty = 2, add = TRUE)
経度緯度を調べるにはココを使う
いつものplotのようにxlim,ylimが経度緯度に対応しているので、東京周辺を範囲としてやれば
map("japan", interior = FALSE,xlim = c(138,141), ylim = c(34,36))
map("japan", boundary = FALSE, lty = 2, add = TRUE)
box()
pointsやtextも位置座標をもとに加えられるのでポインタを置くこともできる
points(139.888229,35.655622,col="red",pch=20)
text(139.888229,35.755622,"urayasu",col="red")
白黒じゃ味気ない人に「leaflet」
背景が地図様になり、mapにピンを刺すaddMarkersなどもある。
描画範囲も与えたデータの範囲から自動でxlim,ylimが変化する。
さらには左上の拡大縮小を使って確認したい範囲に絞ることも簡単になる。
library(leaflet)
library(modeldata)
data(ames, package = "modeldata")
m <- leaflet()
m <- addTiles(m)
m <- addMarkers(m,
lng=ames$Longitude[1:10],
lat=ames$Latitude[1:10],
popup=ames$Fence[1:10])
m
日本だけなら「NipponMap」
library(NipponMap)
library(foreign)
population_jpn <- read.dbf(system.file("shapes/jpn.dbf", package="NipponMap"))
population_jpn
par(bg = "white")
jpn_map <- JapanPrefMap(col = sample(colours(), 47), border = gray(.8), axes = TRUE)
#JapanPrefMap(col = "grey")
symbols(jpn_map,
circles = sqrt(population_jpn$population*0.00000001),
inches = FALSE,
fg = "black",
bg = "blue",
add = TRUE)
library(NipponMap)
library(foreign)
population_jpn <- read.dbf(system.file("shapes/jpn.dbf", package="NipponMap"))
population_jpn
par(bg = "white")
jpn_map <- JapanPrefMap(col = sample(colours(), 47), border = gray(.8), axes = TRUE)
#JapanPrefMap(col = "grey")
symbols(jpn_map,
circles = sqrt(population_jpn$population*0.00000001),
inches = FALSE,
fg = "black",
bg = "blue",
add = TRUE)
人口に対して円を描く
以上
べんり
Author And Source
この問題について(Rで地図を描く時便利な「maps, leaflet, NipponMap」), 我々は、より多くの情報をここで見つけました https://qiita.com/Ringa_hyj/items/0fc8a00ba4b7213cb51e著者帰属:元の著者の情報は、元のURLに含まれています。著作権は原作者に属する。
Content is automatically searched and collected through network algorithms . If there is a violation . Please contact us . We will adjust (correct author information ,or delete content ) as soon as possible .