如何将函数的字符输入作为列名传入data.frame函数？

你的问题出在直接用参数名character_input作为列名时，R会把它当成字符串字面量，而不是解析你传入的字符值。下面是几种可行的解决方式：

方法一：基础R动态设置列名 #

先创建数据框，再修改对应列的名称：

frame_create <- function(data, character_input){
  some_vector <- c(1:50)
  # 先构造包含向量和其他列的数据框
  temp_frame <- data.frame(some_vector, data)
  # 将第一列的名称替换为传入的字符值
  names(temp_frame)[1] <- character_input
  return(temp_frame)
}

方法二：用列表构造实现动态命名 #

利用列表可以通过变量设置名称的特性，先构建列表再转成数据框：

frame_create <- function(data, character_input){
  some_vector <- c(1:50)
  # 初始化列表并设置目标列名
  temp_list <- list()
  temp_list[[character_input]] <- some_vector
  # 合并其他需要的列（比如传入的data）
  temp_list <- c(temp_list, data)
  # 转成数据框
  temp_frame <- as.data.frame(temp_list)
  return(temp_frame)
}

方法三：用rlang包的语法（适合tidyverse场景） #

如果习惯用tidyverse工具，可以用!!和sym实现动态命名：

library(rlang)
frame_create <- function(data, character_input){
  some_vector <- c(1:50)
  temp_frame <- data.frame(!!sym(character_input) := some_vector, data)
  return(temp_frame)
}

内容的提问来源于stack exchange，提问作者3wF23Xyj