使うデータは医療保険医療費データベースの医療費総計（↓をダウンロード）。 http://www.mhlw.go.jp/bunya/iryouhoken/iryouhoken14/xls/01.xls library(googleVis) library(XLConnect) wb <- loadWorkbook("01.xls") #ファイル（ワークブック）を指定する g…