ITAIJIDICTPATH = Sys.setenv(ITAIJIDICTPATH="/usr/local/Cellar/kakasi/2.3.6/share/kakasi/itaijidict")
KANWADICTPATH = Sys.setenv(KANWADICTPATH="/usr/local/Cellar/kakasi/2.3.6/share/kakasi/kanwadict")
library(Nippon)
library(tidyverse)
data(prefectures)
regions <- unique(prefectures$region)
regions
kakasi(regions) %>%
data.frame(romaji=.) %>%
rownames_to_column(.,"kanji")