R语言 画分段函数图像

Question

请问这个函数怎么画图？

```r
f=function(x){
  if(x>=1){
    ((2*(x^3)-10*x)/3)*x
  } else
    2*x+50
}
plot(f,xlim=c(-100,100))

#运行出错

```> plot(f,xlim=c(-100,100))
Error in if (x >= 1) { : the condition has length > 1
Called from: x(x)
Browse[1]>

Answer 1

在R语言中，可以使用ifelse函数来绘制分段函数的图像。以下是一个示例代码：

f <- function(x) {
  ifelse(x >= 1, ((2 * x^3 - 10 * x) / 3) * x, 2 * x + 50)
}
curve(f, xlim = c(-100, 100), n = 1000)

在上面的代码中，我们使用ifelse函数来定义分段函数。curve函数用于绘制函数图像，n参数用于设置曲线的点数，可以根据需要进行调整。

注意，在定义分段函数时，需要使用ifelse函数而不是if语句。if语句只能处理标量，而无法处理向量。