y <- rnorm(n = 100,mean = 75,sd = 10)
stp_fun <- function(x){
y <- length(x)
for( i in 1:y)
x[i] <- max(0,x[i])
x[i] <- min(100,x[i])
x
}
R语言中取整运算主要包括以下五种：floor()：向下取整；ceiling(): 向上取整；round(): 四舍五入取整；turnc(): 向0取整；signif(): 保留给定位数的精度。
floor返回对应数字的'地板'值，即不大于该数字的最大值；
ceiling返回对应数字的'天花板'值，就是不小于该数字的最小整数；
round是R里的'四舍五入'函数，具体的规则采用banker's rounding，即四舍六入五留双规则(wiki)。round的原型是round(x, digits = 0), digits设定小数点位置，默认为零即小数点后零位(取整)。
trun的特性是'向零截取'， 也就是说对于一个数字a，它将数轴分成两侧，trunc(a)将返回数轴上包含数字0的那一侧离a最近的那个整数。
signif是保留有效数字的函数。常用于科学计数。
