上一节:
下一节:

  R 语言 函数

  • 函数

    函数是一起组织以执行特定任务的一组语句。R具有大量内置函数，用户可以创建自己的函数。在R中，函数是对象，因此R解释器能够将控制权以及函数完成动作所必需的参数传递给函数。函数依次执行其任务，并将控制权以及可能存储在其他对象中的任何结果返回给解释器。

  • 函数定义

    通过使用关键字function创建R函数。R函数定义的基本语法如下- 
     
function_name <- function(arg_1, arg_2, ...) {
   Function body 
}

  • 函数组成

    函数的不同部分是-
    • 函数名称-这是函数的实际名称。它以该名称作为对象存储在R环境中。
    • 参数-参数是一个占位符。调用函数时，将一个值传递给参数。参数是可选的；也就是说，一个函数可能不包含任何参数。另外，参数可以具有默认值。
    • 函数体-函数体包含定义函数函数的语句集合。
    • 返回值-函数的返回值是函数主体中要评估的最后一个表达式。
    R有许多内置函数，可以在程序中直接调用它们而无需先定义它们。我们还可以创建和使用我们自己的函数（称为用户定义函数）。

  • 内置函数

    内置函数的简单示例是seq()，mean()，max()，sum（x）和paste（...）等。它们由用户编写的程序直接调用。您可以参考使用最广泛的R函数。 
     
# Create a sequence of numbers from 32 to 44.
print(seq(32,44))

# Find mean of numbers from 25 to 82.
print(mean(25:82))

# Find sum of numbers frm 41 to 68.
print(sum(41:68))
    尝试一下
    当我们执行以上代码时，它产生以下结果- 
     
[1] 32 33 34 35 36 37 38 39 40 41 42 43 44
[1] 53.5
[1] 1526

  • 用户定义函数

    我们可以在R中创建用户定义的函数。它们特定于用户的需求，一旦创建，就可以像内置函数一样使用它们。以下是如何创建和使用函数的示例。 
     
# Create a function to print squares of numbers in sequence.
new.function <- function(a) {
   for(i in 1:a) {
      b <- i^2
      print(b)
   }
}
    调用函数 
     
# Create a function to print squares of numbers in sequence.
new.function <- function(a) {
   for(i in 1:a) {
      b <- i^2
      print(b)
   }
}

# Call the function new.function supplying 6 as an argument.
new.function(6)
    尝试一下
    当我们执行以上代码时，它产生以下结果- 
     
[1] 1
[1] 4
[1] 9
[1] 16
[1] 25
[1] 36
    不带参数地调用函数 
     
# Create a function without an argument.
new.function <- function() {
   for(i in 1:5) {
      print(i^2)
   }
}       

# Call the function without supplying an argument.
new.function()
    尝试一下
    当我们执行以上代码时，它产生以下结果- 
    
[1] 1
[1] 4
[1] 9
[1] 16
[1] 25
    调用带有参数值的函数（按位置和名称）
    函数调用的参数可以按在函数中定义的顺序提供，也可以按不同的顺序提供，但分配给参数的名称。 
     
# Create a function with arguments.
new.function <- function(a,b,c) {
   result <- a * b + c
   print(result)
}

# Call the function by position of arguments.
new.function(5,3,11)

# Call the function by names of the arguments.
new.function(a = 11, b = 5, c = 3)
    尝试一下
    当我们执行以上代码时，它产生以下结果- 
    
[1] 26
[1] 58
    使用默认参数调用函数
    我们可以在函数定义中定义参数的值，然后在不提供任何参数的情况下调用函数以获取默认结果。但是我们也可以通过提供参数的新值来调用此类函数，并获得非默认结果。 
     
# Create a function with arguments.
# Create a function with arguments.
new.function <- function(a = 3, b = 6) {
   result <- a * b
   print(result)
}

# Call the function without giving any argument.
new.function()

# Call the function with giving new values of the argument.
new.function(9,5)
    尝试一下
    当我们执行以上代码时，它产生以下结果- 
    
[1] 18
[1] 45

  • 函数的延迟绑定

    函数的参数是惰性计算的，这意味着它们仅在函数主体需要时才进行评估。 
    
# Create a function with arguments.
new.function <- function(a, b) {
   print(a^2)
   print(a)
   print(b)
}

# Evaluate the function without supplying one of the arguments.
new.function(6)
    尝试一下
    当我们执行以上代码时，它产生以下结果- 
    
[1] 36
[1] 6
Error in print(b) : argument "b" is missing, with no default
上一节:
下一节: