在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)}