在r图中绘制正弦函数

Question

我想画一个简单的sin和这样的函数

在R情节中。

我正在使用此代码：

plot(sin, 0,  2*pi)
curve((4sin+(1/3)sin(3x))/pi, xlim = c(0, 2*pi), n = 1001, col = "blue", add = TRUE)

但是我收到了这个错误：

Error: unexpected symbol in "curve((4sin"

我该怎么做才能解决这个问题？

Answer 1

你不喜欢*符号吗？

plot(sin, 0,  2*pi)
curve(4*(sin(x)+(1/3)*sin(3*x))/pi, xlim = c(0, 2*pi), n = 1001, col = "blue", add = TRUE)