关于在r中绘制分段函数的质疑

我想在R中绘制下面的分段函数，但我在定义它时遇到了困难。我想定义以下函数。对于介于0和小于10之间的x，取值为0.31；对于介于10和29之间的x，取值为0.31-0.00017397（x-10），对于大于29的x，取值为0.31-0.00017397（x-10）。下面是我的R代码

f <- function(x){
ifelse((0 < x & x < 10),0.31,ifelse((10<= x & x < 29),(0.31-0.00017397(x-10)),ifelse((29<=x),(0.31-0.00052702(x-29)),NA)))
}
plot(f,xlim=c(0,35)) 

f这对我很有用：

f <- function(x){
  ifelse((0 < x & x < 10),0.31,ifelse((10 <= x & x < 29),(0.31-0.00017397*(x-10)),ifelse((29 <= x),(0.31-0.00052702*(x-29)),NA)))
}
plot(f,xlim=c(0,35)) 

f Ridhima-你的函数唯一的错误是它缺少两个乘法的
*
：
0.00017397*（x-10）
和
0.00052702*（x-29）
是的，迈克，我知道，我错过了这一点真是太傻了