data-raw/amedas_stations.R

library(readr)

amedas_stations <- read_csv(here::here("data-raw/ame_master_20210707.csv"), locale = locale(encoding = "CP932")) %>%
  dplyr::mutate(ローマ字名 = zipangu::str_conv_romanhira(カタカナ名,"roman"), .after = カタカナ名)

save(amedas_stations, file = "data/amedas_stations.rda")
arichardsmith/ramedas documentation built on Dec. 19, 2021, 4:38 a.m.