21、R语言统计计算全攻略：从基础到实战

R语言统计计算全攻略：从基础到实战

1. 用户自定义函数

R语言的强大之处不仅在于其丰富的内置函数，如length和dim，更在于用户能够自定义函数并在程序中调用。自定义函数的一般结构如下：

my_func_name <- function([optional arguments]) { operations return(value) [optional] }

这里，每个函数都需要一个名称，用于在脚本中调用。关键字function后可跟可选参数，参数放在括号内。函数代码包含在花括号中，最后可以返回一个值。

下面以判断一个数是否为三角数为例，展示自定义函数的编写。三角数是指可以排列成等边三角形的物体的数量，如1、3、6、10和15。每个三角数T可以写成T = n(n + 1)/2的形式。因此，一个整数y是三角数，当且仅当n = (sqrt(8 * y + 1) - 1) / 2也是整数。以下是判断函数的代码：

# check whether a number is triangular # take a single argument, y is_triangular <- function(y){ n <- (sqrt((8 * y) + 1) - 1) / 2 # if triangular, then n shou