绘制图形 R

Question

尝试在 R 上绘制图表，需要在同一张图中绘制 2 个图表

f(x) = sin(x)+pi/4, -2*Pi <= x <= 2*Pi 

g(x) = {sin(x), 0<= x <= Pi or -2*Pi <= x <= 2*Pi
       {-Pi/4             elsewhere.

我相信我已经正确地绘制了 f(x) 但是一点也不明白如何 plot g(x)

对于 f(x) 我有：

t<-seq(from=2*pi, to="*pi, length=500)
plot(sin(t)+pi/4

抱歉不确定如何编辑，将不胜感激。

任何关于如何绘制像 g(x) 这样的图的指针都会很棒，只是为了让你知道这是作业所以不要指望任何人做它只是关于如何绘制这种函数的指针会很棒，谢谢。

Answer 1

我会使用 curve 函数：

curve(sin(x) + pi / 4, from = -2 * pi, to = 2 * pi, ylim = c(-2, 2))

curve(sin(x), from = 0,       to = pi,     add = TRUE)
curve(sin(x), from = -2 * pi, to = 2 * pi, add = TRUE)

Answer 2

另一种选择是为 g(x 编写自定义函数，并将其用作 curve 函数中的 expr。

calculate_gx <- function(x){
  ifelse(x <= (2*pi) & x >= (-2*pi), sin(x), -pi/4 )
}

curve(calculate_gx, from = -3*pi, to = 3 * pi, n = 200)

结果：

绘制图形 R

Plotting Graphs R

trigonometry

r

graph