在R中绘制分段函数

Question

我正在阅读本网站中有关如何在R中绘制分段函数的其他类似问题，我编写此代码

myfunction = function(x){(x<-1)*(x^2+2*x)+(-1<=x & x<=1)*x+(x>1)*(-1)}
g=Vectorize(myfunction)
plot(g,-5,5)

然而，绘图只是一条直线，也就是说，它没有绘制定义的函数。 我做错了什么？

Answer 1

<-是分配，不会被解释为“小于负”。 在那里添加一个空格，你会看到你的期望。

myfunction = function(x){(x< -1)*(x^2+2*x)+(-1<=x & x<=1)*x+(x>1)*(-1)}