都道府県県庁間の距離行列（単位：m）を作成してみました。dist_Pref <- read.csv("https://raw.githubusercontent.com/yoshida-gisc/…