我想在R中绘制下面的分段函数,但我无法定义它。我想定义以下函数。它取0的值在0到小于10之间,对于x在10到29之间,它取值0.31-0.00017397(x-10),类似地,x大于29。下面是我的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))
非常感谢提前!
答案 0 :(得分:1)
这对我有用:
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))
(注意*乘法)