okamap

library(sf)

## Linking to GEOS 3.8.0, GDAL 3.0.4, PROJ 6.3.1

library(jpndistrict)

## 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 <http://www.gsi.go.jp>)

ip <- 33
sf_pref <- jpn_pref(ip, district = TRUE) 
sf_pref %>% st_geometry() %>% plot(col = 1:10)