R语言有很多包,里面有很多函数,但是有时候我们还是需要自定义一些函数,这些函数能够实现一些特定的功能,其实学过一点编程的知道任何语言都可以自定义函数,R语言自定义函数格式如下:
函数的语法格式是:
functionname <- function(parameters){
statements
return(value)
}
如果函数中有多个参数,那么参数之间用逗号隔开。
参数可以通过关键字和/或位置来传递。另外,参数可以有默认值。
举例1:
f <- function(x, y, z=1){
result <- x + (2*y) + (3*z)
return(result)
}
> f(2,3,4)
[1] 20
> f(2,3)
[1] 11
> f(x=2, y=3)
[1] 11
> f(z=4, y=2, 3)
[1] 19
举例2:
> x <- 1
> y <- 3
> z <- 4
> f <- function(w){
z <- 2
x <- w*y*z
return(x)
}
> f(x)
[1] 6
> x
[1] 1
> y
[1] 3
> z
[1] 4
参考文献
R语言实战第2版