Skip to content

uribo/jpndistrict

master
Switch branches/tags

Name already in use

A tag already exists with the provided branch name. Many Git commands accept both tag and branch names, so creating this branch may cause unexpected behavior. Are you sure you want to create this branch?
Code

Latest commit

 

Git stats

Files

Permalink
Failed to load latest commit information.
Type
Name
Latest commit message
Commit time
 
 
R
 
 
 
 
 
 
 
 
man
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

jpndistrict

CRAN_Status_Badge Coverage status

Overview

In this package, the administrative area data to be provided uses the National Land Numerical Information. Shinya Uryu is editing and processing this data. Therefore, when preparing a secondary work using this data, it is necessary to follow the term of the National Land Numerical Information.

This package provide map data is based on the Digital Map 25000 (Map Image) published by Geospatial Information Authority of Japan (Approval No.603FY2017 information usage https://www.gsi.go.jp).

Installation

Install from CRAN.

It is currently not available for installation. Please install the next development version.

# install.packages("jpndistrict")

For developers, please use the remotes package to install via the GitHub repository.

install.packages("remotes")
remotes::install_github("uribo/jpndistrict")

Usage

# Load Package
library(jpndistrict)

Administrative area data

jpn_pref(14)
jpn_pref(14, district = FALSE)
jpn_cities(14, admin_name = "海老名市")
jpn_cities(33, admin_name = c("倉敷市", "笠岡市"))
# Return mesh polygons included in administrative areas.
mesh_district(jis_code = "05")
mesh_district(jis_code = 33101)

Administration office data

jpn_admins(jis_code = 33)
jpn_admins(jis_code = c("33101", "33212"))

Reverse geocoding in prefecture and city level

find_pref(longitude = 133.915, latitude = 34.666)
find_city(longitude = 133.915, latitude = 34.666)
# sfg
find_city(geometry = sf::st_point(c(140.112, 36.083)))

City name and code validation

code_validate(jis_code = 33101)
code_reform(jis_code = c(1, "33", "08201"))