はじめに

題名がすべてですが、data.tableの中にあるNAをすべて0にしたいと思ったのですが、変なところにハマったので、備忘録代わりに書きます。

data.frameなら一発？

{dplyr}のパイプの中でNAを0に置換するの中で、data.frame中に含まれるNAを一括で0にするには、下記のコードで一発だそうです。

NAの一括変換

df[is.na(df)] <- 0

ところが、data.tableに適用するとエラーが出てしまいます。

data.tableの失敗例

dt[is.na(dt)] <- 0
 エラー: Must use a vector in `[`, not an object of class matrix.

どうやら、is.na(dt)が配列として解釈されるのがだめっぽい。なぜだろう。意味がないと思いつつ、dt[,is.na(dt)] としてもdt[is.na(dt),] としてもだめだった。

先程ご紹介した記事だと、dplyrを使った例も提示されている。

dplyrを使った例

dt %>%
  mutate_all(funs(ifelse(is.na(.),0,.)))

これで行けるのだが、最新バージョンだとfuns()はdeprecatedだよ、と怒られるようになったので、ラムダ式を使った方法にするとよい。

ラムダ式を使った例

dt %>%
  mutate_all(~ifelse(is.na(.),0,.))

なんかもっと方法がある気もするが、この方法だと、記事中にあるようにmutate_atとかも使えて応用が効くので知っていて損はない。