当自带的函数不满足我们需求时，可以采用以下形式来自定义函数：
自定义函数名=function(参数1,参数2,...){
运算过程
return(返回值)
}
说明：其中参数和返回值可以不加
将for循环中求n阶乘的例子封装成函数
myfactor=function(n){ # 创建自定义求阶乘的函数 n为函数的参数
f=1
for(i in 1:n){
f=f*i
}
return(f) # 函数返回值
}
myfactor(10) # 调用自定义函数
[1] 3628800
myfactor(7) # 调用自定义函数
[1] 5040