R语言画分段函数图像

请问这个函数怎么画图？


```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]>

在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语句只能处理标量，而无法处理向量。

不知道你这个问题是否已经解决, 如果还没有解决的话:

如果你已经解决了该问题, 非常希望你能够分享一下解决方案, 写成博客, 将相关链接放在评论区, 以帮助更多的人 ^-^

R语言 画分段函数图像