RからExcel ref: http://qiita.com/hotoku/items/f0097fe7b26161f38c80