在dplyr中基于向量创建新列

Question

使用dplyr，可以使用mutate：

轻松创建新列

df <- data.frame(v1 = 1:3, v2 = c('a','b','c'))
> mutate(df, newcol = NA)
  v1 v2 newcol
1  1  a     NA
2  2  b     NA
3  3  c     NA

我们还可以使用mutate_at创建多个带有向量的新列（显示为here）：

> cnames <- c('newcol1', 'newcol2', 'newcol3')
> mutate_at(df, cnames, funs(log(v1)))
  v1 v2   newcol1   newcol2   newcol3
1  1  a 0.0000000 0.0000000 0.0000000
2  2  b 0.6931472 0.6931472 0.6931472
3  3  c 1.0986123 1.0986123 1.0986123

是否有一种简单的方法可以使用dplyr将这些新列初始化为NA？

例如，mutate_at(df, cnames, funs(v1 * NA))给出了期望的结果，但这似乎是间接的。我想要的是：

mutate_at(df, cnames, funs(. = NA)) # Error: Can't create call to non-callable object

我们不需要知道任何其他列的名称。

（我知道这可以通过df[ , cnames] <- NA解决，但我正在寻找使用dplyr函数的解决方案）

Answer 1

你可以这样做。

library(dplyr)
df %>% 
 `is.na<-`(cnames)
#  v1 v2 newcol1 newcol2 newcol3
#1  1  a      NA      NA      NA
#2  2  b      NA      NA      NA
#3  3  c      NA      NA      NA

我希望%>% dplyr足够{{1}}。 ;）