更新

Ｒスクリプトの整理により資料を修正