用R语言写一个线性分段函数

可以使用以下代码实现一个线性分段函数：

# 定义线性分段函数
f <- function(x) {
  if (x < 0) {
    return(0)
  } else if (x < 1) {
    return(x)
  } else {
    return(2 - x)
  }
}

# 绘制函数图像
plot(f, -1, 3, ylim = c(0, 2), main = "线性分段函数")

这个函数在 x < 0 时返回 0，在 0 <= x < 1 时返回 x，在 x >= 1 时返回 2 - x。可以通过修改 if 和 else if 语句中的条件和返回值来定义不同的线性分段函数。