如何在 r 中使用 source 函数（附示例）

您可以使用 R 中的源函数来重用您在另一个 R 脚本中创建的函数。

该函数使用以下基本语法：

 source ("path/to/some/file.R")

只需将此行添加到 R 脚本的顶部，您就可以使用file.R中定义的所有函数。

以下示例展示了如何在实际中使用source函数。

示例：使用 R 中的源函数

假设我们有以下名为some_functions.R 的R 脚本，其中包含两个简单的用户定义函数：

 #define function that divides values by 2
divide_by_two <- function (x) {
  return (x/2)
}

#define function that multiplies values by 3
multiply_by_three <- function (x) {
  return (x*3)
}

现在假设我们正在使用一个名为main_script.R的 R 脚本。

假设some_functions.R和main_script.R位于同一文件夹中，我们可以使用main_script.R顶部的 source 来允许我们使用在some_functions.R脚本中定义的函数：

 source ("some_functions.R")

#create data frame
df <- data. frame (team=c('A', 'B', 'C', 'D', 'E', 'F'),
                 points=c(14, 19, 22, 15, 30, 40))

#view data frame
df

  team points
1 to 14
2 B 19
3 C 22
4 D 15
5 E 30
6 F 40

#create new columns using functions from some_functions.R
df$half_points <- divide_by_two(df$points)

df$triple_points <- multiply_by_three(df$points)

#view updated data frame
df

  team points half_points triple_points
1 A 14 7.0 42
2 B 19 9.5 57
3 C 22 11.0 66
4 D 15 7.5 45
5 E 30 15.0 90
6 F 40 20.0 120

请注意，我们可以使用我们在some_functions.R脚本中定义的函数在数据框中创建两个新列。

源函数允许我们在当前脚本中使用Divide_by_Two和Multiplier_by_Three函数，即使这些函数不是在当前脚本中创建的。

注意：在此示例中，我们仅在文件顶部使用了一个源函数。但是，如果我们想重用在多个不同脚本中定义的函数，我们可以使用任意数量的源函数。

其他资源

以下教程解释了如何使用 R 中的其他常用函数：

如何在 R 中使用 View() 函数
如何在 R 中使用 Aggregate() 函数
如何在R中使用replace()函数