在自定义函数R中传入df和column

我希望在同一个df上应用多个

gsub

调用。所以，我想创建一个函数，但似乎不起作用。以下是我得到的：

get_clean_party <- function(df, feature){
  df$feature <- gsub("D","Democrat", df$feature)
  df$feature <- gsub("R","Republican", df$feature)
}

---

get\u clean\u party如果将列名作为字符串传递，则此操作有效：

get\u clean\u party如果将列名作为字符串传递，则此操作有效：

get_clean\u party如果要执行精确匹配，可以使用
dplyr
的
recode
功能。当列名作为变量时，也不要使用
$

get_clean_party <- function(df, feature){
  df[[feature]] <- dplyr::recode(df[[feature]], D = 'Democrat', R = 'Republican')
  df
}
df <- get_clean_party(df, "col_name")

get_clean\u party如果要执行精确匹配，可以使用
dplyr
的
recode
功能。当列名作为变量时，也不要使用
$

get_clean_party <- function(df, feature){
  df[[feature]] <- dplyr::recode(df[[feature]], D = 'Democrat', R = 'Republican')
  df
}
df <- get_clean_party(df, "col_name")

get_clean_party
get_clean_party <- function(df, feature){
  df[[feature]] <- dplyr::recode(df[[feature]], D = 'Democrat', R = 'Republican')
  df
}
df <- get_clean_party(df, "col_name")