Rで解析：欠損値に関するコマンド

欠損値に関するコマンドです。Rを使い始めた頃にsumコマンドで論理値ベクトルの総TRUE数を取得できることを知った時には少し賢くなった気がしました。

実行コマンドはR version 4.2.2で確認しています。

実行コマンド

詳細はコメント、コマンドのヘルプを確認してください。

#&#27424;&#25613;&#20516;&#12434;&#21547;&#12416;&#12505;&#12463;&#12488;&#12523;&#12398;&#20316;&#25104;
TestVec <- as.integer(sample(c(1:10, "NA"), 100, replace = TRUE))

#summary&#12467;&#12510;&#12531;&#12489;&#12391;&#35201;&#32004;
summary(TestVec)
Min.  1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
1.000   3.000   5.500   5.319   8.000  10.000       6 

#&#21512;&#35336;&#12434;&#30906;&#35469;,&#22810;&#12367;&#12398;&#22522;&#26412;&#12467;&#12510;&#12531;&#12489;&#12395;na.rm&#12458;&#12503;&#12471;&#12519;&#12531;&#12364;&#12354;&#12426;&#12414;&#12377;
#&#28961;&#12356;&#22580;&#21512;&#12399;na.omit&#12467;&#12510;&#12531;&#12489;&#12391;&#20966;&#29702;&#12377;&#12427;&#12398;&#12418;&#12354;&#12426;&#12391;&#12377;
sum(TestVec, na.rm = TRUE)
[1] 500

#&#27424;&#25613;&#20516;&#12434;&#21547;&#12416;&#12363;&#30906;&#35469;
is.na(TestVec)
#sum&#12467;&#12510;&#12531;&#12489;&#12392;&#12398;&#32068;&#12415;&#21512;&#12431;&#12379;
#&#27424;&#25613;&#20516;&#12398;&#25968;&#12434;&#21462;&#24471;&#12391;&#12365;&#12414;&#12377;
sum(is.na(TestVec))
[1] 6

#&#27424;&#25613;&#20516;&#12434;&#32622;&#12365;&#25563;&#12360;&#12427;
TestVec[is.na(TestVec)] <- 9999

#&#30906;&#35469;
summary(TestVec)
Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
1.0     3.0     6.0   604.9     8.0  9999.0 

sum(is.na(TestVec))
[1] 0

少しでも、あなたの解析が楽になりますように！！