在R中绘制复杂函数

Question

我正在使用一本名为“使用R发现统计数据”的书自学R，而我正在制作图表，因为有关编程美学的知识非常多。

这本书并没有真正说明这一点，我在谷歌上找不到像下面这样的函数的例子。所以我想知道如何绘制这个功能有点复杂。我得到的例子是：

我已经在这里查看了几个绘图问题，但它们没有涵盖这样的功能。

我知道如何创建简单的情节和图例等，但如何在R中绘制此函数？

提前致谢。

Answer 1

# create a function
myfun <- function(x) 
  ifelse((0 <= x & x <= pi) | ((-2 * pi) <= x & x <= -pi), sin(x), -pi / 4)

# plot a curve
curve(myfun, from = -10, to = 10)