R语言里写了一个分段函数，想让自变量是一列向量要怎么定义？

geng_kim

R语言里写了一个分段函数，想让自变量是一列向量要怎么定义？
如下：
fun=function(x)
{
if(x>1.5)print(1.5)
else if(x<=1.5&x>=-1.5)print(x)
else print(-1.5)
}

如果想要x的一列向量，应该怎么定义？

> source("C:\\Users\\lenovo\\Desktop\\12d.R")
>  x<-c(2.1,5.2,2.3,1.4,2.2,2.3,1.6)
> fun(x)
[1] 1.5
警告信息：
In if (x > 1.5) print(1.5) else if (x <= 1.5 & x >= -1.5) print(x) else print(-1.5) :
  条件的长度大于一，因此只能用其第一元素

zqzzzq

t()函数………………

zqzzzq

你这代码……好恐怖……
看看apply（）函数？