plots.rを作成