济南建设项目竣工验收公示网站中国今天最新军事新闻

R语言基础(一)：注释、变量
R语言基础(二)：常用函数
R语言基础(三)：运算
R语言基础(四)：数据类型
R语言基础(五)：流程控制语句

7. 函数

函数是一组完成特定功能的语句。

7.1 内置函数

R语言系统中提供许多内置函数，用户可以直接使用

> seq(1,5)  #得到一个序列
[1] 1 2 3 4 5
> mean(2:8) #平均值
[1] 5
> x = c(-3,-1,1,2,3,4,5)
> mean(x,trim=0.2) #去除左右 20%的数据再计算
[1] 1.8
> median(x) #中位数
[1] 2
> max(22,33) #最大值
[1] 33

R语言中包含常用的数学函数，比如四舍五入、对数函数、三角函数等。

7.2 自定义函数

自定义数使用function声明，函数声明包括参数(可选)和返回值(可选)

#没有参数的函数，f1是函数名

f1 <- function(){
for(i in 1:5){
print(i)
}
}
#调用函数
f1()
[1] 1
[1] 2
[1] 3
[1] 4
[1] 5
#有参数的函数,a是自定义的参数
f2 <- function(a){
for(i in 1:a){
print(i)
}
}
#调用函数，需要传参数
f2(3)
[1] 1
[1] 2
[1] 3
f2()
Error in f2() : 缺少参数"a",也没有缺省值
#带默认值的函数
f3 <- function(a=3,b=5){
for(i in a:b){
print(i)
}
}
f3(3,5)
[1] 3
[1] 4
[1] 5
#按参数名赋值
f3(b=5,a=2)
[1] 2
[1] 3
[1] 4
[1] 5
#有参数的函数,a是自定义的参数
f4 <- function(a,b){
sum=0
for(i in a:b){
sum=sum+i
}
#也可以直接写sum，省略return
return(sum)
}
s=f4(1,3) #调用并得到返回值
s
[1] 6