r - 向数据框添加新列的函数

Question

我需要一个将新列(具有常量值)添加到数据帧 df 的函数。到目前为止，我的尝试是这样的:

f = function(df, col.name, col.value){
  df$col.name = col.value
  print(df)
 }

典型的输入是:

f(df, "New column", NA)

这会给我一个值为 NA 的新列，但是，它会被命名为 col.name 。

非常感谢任何帮助。

Answer 1

R 具有用于此类事情的内置函数，即用于分配单列数据的 $<-。

> test <- data.frame(a=1:3,b=4:6)

> test
  a b
1 1 4
2 2 5
3 3 6

> `$<-`(test,"new_column",NA)
  a b new_column
1 1 4         NA
2 2 5         NA
3 3 6         NA

正如@MatthewLundberg 在下面的评论中所说，如果你想避免时髦的函数名称，你可以将它分配给你的新函数:

> f <- `$<-`
> f(test,"new_column",NA)
  a b new_column
1 1 4         NA
2 2 5         NA
3 3 6         NA