Rで折れ線グラフ、棒グラフ (新型コロナウイルス：Coronavirus)