R - 对多列应用相同的函数

在R中，可以使用apply()函数对多列应用相同的函数。apply()函数可以对矩阵或数据框的行或列进行操作。

下面是一个使用apply()函数对多列应用相同的函数的示例代码：

# 创建一个示例数据框
data <- data.frame(
  col1 = c(1, 2, 3),
  col2 = c(4, 5, 6),
  col3 = c(7, 8, 9)
)

# 创建一个函数，用于对每列进行操作
multiply_by_2 <- function(x) {
  return(x * 2)
}

# 使用apply()函数对多列应用相同的函数
result <- apply(data, 2, multiply_by_2)

# 打印结果
print(result)

在上面的代码中，首先创建了一个示例数据框data，它包含了三列。然后，定义了一个函数multiply_by_2，该函数将输入的值乘以2。最后，使用apply()函数对数据框data的每列应用multiply_by_2函数，并将结果存储在result中。最后，打印出结果。

运行以上代码，将输出如下结果：

     col1 col2 col3
[1,]    2    8   14
[2,]    4   10   16
[3,]    6   12   18

可以看到，每列都被乘以了2，并且结果被存储在了result中。