是否有一个R函数可以将数据帧中包含向量的两列相乘？

# 创建一个包含向量的数据帧
df <- data.frame(col1 = c(1, 2, 3), col2 = c(4, 5, 6))

# 将数据帧中的两列相乘
result <- df$col1 * df$col2

# 输出结果
print(result)

multiply_columns <- function(data_frame, col1_name, col2_name) {
  result <- data_frame[[col1_name]] * data_frame[[col2_name]]
  return(result)
}

# 使用自定义函数将数据帧中的两列相乘
result <- multiply_columns(df, "col1", "col2")

# 输出结果
print(result)