R - 函数

函数是一组组织在一起以执行特定任务的语句。R 具有大量内置函数，用户可以创建自己的函数。

在 R 中，函数是一个对象，因此 R 解释器能够将控制权以及函数完成操作可能需要的参数传递给函数。

该函数反过来执行其任务并将控制权以及可能存储在其他对象中的任何结果返回给解释器。

功能定义

R 函数是使用关键字 function 创建的。R 函数定义的基本语法如下 -

function_name <- function(arg_1, arg_2, ...) {
	 	Function body	
}

功能组件

函数的不同部分是 −

• 函数名称 − 这是函数的实际名称。它作为具有此名称的对象存储在 R 环境中。
• 参数 − 参数是占位符。调用函数时，将值传递给参数。参数是可选的;也就是说，函数可以不包含任何参数。此外，参数可以具有默认值。
• 函数体 − 函数体包含定义函数用途的语句集合。
• 返回值 - 函数的返回值是函数体中要计算的最后一个表达式。

R 有许多内置函数，可以在程序中直接调用，而无需先定义它们。我们还可以创建和使用我们自己的函数，称为用户定义的函数。

内置功能

内置函数的简单示例是 seq（）、mean（）、max（）、sum（x） 和 paste（...） 等。它们由用户编写的程序直接调用。您可以参考使用最广泛的 R 函数。

# 创建一个从32到44的数字序列。
print(seq(32,44))

# 求25到82之间的数字的平均值。
print(mean(25:82))

# 求41到68之间的数字之和。
print(sum(41:68))

当我们执行上述代码时，它会产生以下结果——

用户定义的函数

我们可以在 R 中创建用户定义的函数。它们特定于用户的需求，一旦创建，就可以像内置函数一样使用。下面是如何创建和使用函数的示例。

# 创建一个函数，按顺序打印数字的平方。
new.function <- function(a) {
	 	for(i in 1:a) {
	 	 	 b <- i^2
	 	 	 print(b)
	 	}
}		 	

调用 Function

# 创建一个函数，按顺序打印数字的平方。
new.function <- function(a) {
	 	for(i in 1:a) {
	 	 	 b <- i^2
	 	 	 print(b)
	 	}
}

# 调用函数new.function，提供6作为参数。
new.function(6)

当我们执行上述代码时，它会产生以下结果——

调用不带参数的函数

# 创建一个没有参数的函数。
new.function <- function() {
	 	for(i in 1:5) {
	 	 	 print(i^2)
	 	}
}		 	

# 在不提供参数的情况下调用函数。
new.function()

当我们执行上述代码时，它会产生以下结果——

使用参数值调用函数（按位置和按名称）

函数调用的参数可以按函数中定义的相同顺序提供，也可以按不同的顺序提供，但分配给参数的名称。

# 创建一个带参数的函数。
new.function <- function(a,b,c) {
	 	result <- a * b + c
	 	print(result)
}

# 按参数的位置调用函数。
new.function(5,3,11)

# 按参数名称调用函数。
new.function(a = 11, b = 5, c = 3)

当我们执行上述代码时，它会产生以下结果——

调用带有 default 参数的函数

我们可以在函数定义中定义参数的值，并在不提供任何参数的情况下调用函数来获得默认结果。但我们也可以通过提供参数的新值来调用此类函数，并获得非默认结果。

# 创建一个带参数的函数。
new.function <- function(a = 3, b = 6) {
	 	result <- a * b
	 	print(result)
}

# 在不给出任何参数的情况下调用函数。
new.function()

# 调用函数并给出参数的新值。
new.function(9,5)

当我们执行上述代码时，它会产生以下结果——

函数的惰性计算

函数的参数是惰性计算的，这意味着它们仅在函数体需要时才被计算。

# 创建一个带参数的函数。
new.function <- function(a, b) {
	 	print(a^2)
	 	print(a)
	 	print(b)
}

# 在不提供任何参数的情况下计算函数。
new.function(6)

当我们执行上述代码时，它会产生以下结果——