課題名

rm(list = ls())
#ここにRコードを記入
#例)
plot(1:9)