R изменить имена столбцов по нескольким данным

Question

Я пытаюсь изменить имена столбцов на нескольких наборах данных. Я пытался писать следующую функцию, чтобы сделать это:

# simplified test data # 
df1<-as.data.frame(c("M","F")) 
colnames(df1)<-"M1" 

# my function # 
rename_cols<-function(df){ 
    colnames(df)[names(df) == "M1"] <- "sex" 
} 
rename_cols(df1) 

Однако при тестировании этой функции df1, столбец всегда называется «M1» вместо «секс». Как я могу это исправить?

РЕШЕНИЕ - БЛАГОДАРЯ DAVID Аренберг

rename_cols<-function(df){ 
    colnames(df)[names(df) == "M1"] <- "sex" 
    df 
} 
df1<-rename_cols(df1) 

Answer 1

Вот еще одно решение, которое позволяет обойти проблему функций, работающих во временном пространстве:

df <- as.data.frame(c("M","F")) 
colnames(df) <- "M1" 

rename_cols <- function(df) { 
    colnames(df)[names(df) == "M1"] <<- "sex" 
} 

> rename_cols(df)   # this will operate directly on the 'df' object 
> df 
    sex 
1 M 
2 F 

Использование глобального оператора присваивания <<- делает имя изменения во входном кадре данных df «палка». Конечно, это решение не идеально, потому что это означает, что функция может потенциально сделать что-то нежелательное. Но я чувствую, что это в духе того, что вы пытались сделать изначально.