版主答得很好了,我写点注释
f=function(x){
if(x>1.1) {return(1.1) #让这个函数可以返回值
}else if(x>=-1.1&x<=1.1) {return(x)
} else {return(-1.1)}
}
x=seq(-4,4,length.out=200) #得出一个向量,后面再用函数得出散点(因点很多近似成线,r作图基本都这样)
y=sapply(x,f) #将f函数作用于x的每个元素得出对应函数值向量 sapply即simple apply,是lpply(list apply)的衍生函数
plot(x,y,type="l",col="black",lwd=2) #plot的参数你就自己查啦