画图

x <- 1:10
y <- x * x

plot(x, y)