# رسم یک تابع ریاضی
curve(sin(x), from=-2*pi, to=2*pi, col="blue", lwd=2, ylab="y", xlab="x")
abline(h=0, col="red")