缥缈止盈
dplyr杂交选项现在比BaseR子集重新分配快30%左右。在一个100米的数据池上mutate_all(~replace(., is.na(.), 0))比基数R快半秒d[is.na(d)]
x[[j]][is.na(x[[j]])] = 0 }# tidyverse## dplyrdplyr_if_else
}dplyr_coalesce
s.list(setNames(rep(0, 10), as.list(c(paste0("var", 1:10)))))) }## hybrid hybrd.ifelse
s.na(.), 0, .)) }hybrd.replace_na
x, ~replace(., is.na(.), 0)) }hybrd.rplc_at.idx
unction(x) { mutate_at(x, vars(var1:var10), ~replace(., is.na(.), 0)) }hybrd.rplc_at.stw
th("var")), ~replace(., is.na(.), 0)) }hybrd.rplc_at.ctn
) }hybrd.rplc_at.mtc
) { mutate_if(x, is.numeric, ~replace(., is.na(.), 0)) }# data.table library(data.table)DT.for.set.nms
(j in names(x))
set(x,which(is.na(x[[j]])),j,0) }DT.for.set.sqln
set(x,which(is.na(x[[j]])),