メモ化による処理の高速化

[uribo]

Summary

memoiseパッケージを利用。メッシュコードの変換処理はキャッシュを効かせて高速化する。市町村コードの抽出もキャッシュ。

対象の関数

• administration_mesh()
• meshcode_set()
• export_mesh() (export_meshes())

比較

メモ化前

library(jpmesh)
tictoc::tic()
administration_mesh(code = "35201", to_mesh_size = 1)
tictoc::toc()
#> 6.894 sec elapsed

tictoc::tic()
m <- 
  meshcode_set(10, .raw = FALSE)
tictoc::toc()
#> 7.608 sec elapsed

tictoc::tic()
export_meshes(m)
tictoc::toc()
#> 94.976 sec elapsed

メモ化後

pkgload::load_all()
tictoc::tic()
administration_mesh(code = "35201", to_mesh_size = 1)
tictoc::toc()
#> 1.382 sec elapsed

tictoc::tic()
m <- 
  meshcode_set(10, .raw = FALSE)
tictoc::toc()
#> 0.012 sec elapsed

tictoc::tic()
export_meshes(m)
tictoc::toc()
#> 8.695 sec elapsed

Related issues

なし