入出力リストを作成 - R たぶん