Rで解析：オブジェクトの内容やベクトルでの位置を確認するコマンドのまとめ

Rを使用していると、ifコマンドを利用して「オブジェクトの内容で処理を変えたり」、文字列や数列などで「ある文字(数字)がどこの位置に存在するか」などの情報を取得する必要が出てきます。これら操作に必要なコマンドをまとめてみました。

新たにパッケージを導入する必要はありません。実行コマンドはwindows 11のR version 4.1.2で確認しています。

実行コマンド

#&#12487;&#12540;&#12479;&#20363;
a <- c(1, 4, 4, 6)
b <- c(3, 4, 6, 7)

#&#19968;&#33268;&#12398;&#30906;&#35469;
a == b
[1] FALSE  TRUE FALSE FALSE

#&#12505;&#12463;&#12488;&#12523;&#12398;&#38263;&#12373;&#12364;&#30064;&#12394;&#12427;&#22580;&#21512;
#&#12456;&#12521;&#12540;&#12364;&#20986;&#12414;&#12377;
c <- c(1, 5, 4, 6, 9)
a == c
[1]  TRUE FALSE  TRUE  TRUE FALSE
Warning message:
  In a == c :
  &#38263;&#12356;&#12458;&#12502;&#12472;&#12455;&#12463;&#12488;&#12398;&#38263;&#12373;&#12364;&#30701;&#12356;&#12458;&#12502;&#12472;&#12455;&#12463;&#12488;&#12398;&#38263;&#12373;&#12398;&#20493;&#25968;&#12395;&#12394;&#12387;&#12390;&#12356;&#12414;&#12379;&#12435; 

#&#19968;&#33268;&#12398;&#30906;&#35469;&#12395;"=="&#12434;&#20351;&#29992;&#12377;&#12427;&#12392;&#12505;&#12463;&#12488;&#12523;&#12391;&#34920;&#31034;&#12373;&#12428;&#12427;&#12398;&#12391;
#if&#25991;&#12391;&#12398;&#20351;&#29992;&#12391;&#12399;&#24037;&#22827;&#12364;&#24517;&#35201;&#12394;&#22580;&#21512;&#12364;&#12354;&#12426;&#12414;&#12377;
#&#12381;&#12371;&#12391;&#12289;&#12458;&#12473;&#12473;&#12513;&#12398;&#19968;&#33268;&#30906;&#35469;&#26041;&#27861;
#identical(all.equal(&#27604;&#36611;A, &#27604;&#36611;B), TRUE)
identical(all.equal(a, b), TRUE)
[1] FALSE

#%in%&#12434;&#20351;&#29992;
#&#24847;&#21619;:a&#12399;c&#12395;&#21547;&#12414;&#12428;&#12390;&#12356;&#12427;&#12363;
a %in% c
[1] TRUE TRUE TRUE TRUE

#&#19981;&#19968;&#33268;&#12398;&#30906;&#35469;
a != b
[1]  TRUE FALSE  TRUE  TRUE

#a&#12399;b&#12424;&#12426;&#22823;&#12365;&#12356;&#12363;&#12398;&#30906;&#35469;
a > b
[1] FALSE FALSE FALSE FALSE

#a&#12399;b&#20197;&#19978;&#12363;&#12398;&#30906;&#35469;
a >= b
[1] FALSE  TRUE FALSE FALSE

#a&#12399;b&#12424;&#12426;&#23567;&#12373;&#12356;&#12363;&#12398;&#30906;&#35469;
a < b
[1]  TRUE FALSE  TRUE  TRUE

#a&#12399;b&#26410;&#28288;&#12363;&#12398;&#30906;&#35469;
a <= b
[1] TRUE TRUE TRUE TRUE

#a&#12392;b&#12398;&#29702;&#35542;&#21644;
a | b
[1] TRUE TRUE TRUE TRUE

#a&#12392;b&#12398;&#29702;&#35542;&#31309;
a & b
[1] TRUE TRUE TRUE TRUE

#&#12458;&#12502;&#12472;&#12455;&#12463;&#12488;&#12398;&#23436;&#20840;&#19968;&#33268;&#30906;&#35469;
identical(a, b)
[1] FALSE

#&#27880;&#24847;:&#23436;&#20840;&#19968;&#33268;&#12394;&#12398;&#12391;&#22411;&#12418;&#30906;&#35469;&#12373;&#12428;&#12414;&#12377;
#&#20363;&#12360;&#12400;&#25972;&#25968;&#22411;&#12392;&#20493;&#31934;&#24230;&#23569;&#25968;&#12391;&#12399;FALSE&#12392;&#12394;&#12426;&#12414;&#12377;
identical(as.integer(10), 10.0)
[1] FALSE

#&#12391;&#12418;identical(10, 10.0)&#12392;&#23455;&#34892;&#12377;&#12427;&#12392;
identical(10, 10.0)
[1] TRUE

#&#26465;&#20214;&#12434;&#28288;&#12383;&#12377;&#12505;&#12463;&#12488;&#12523;&#12398;&#20301;&#32622;&#12434;&#21462;&#24471;
#which&#12467;&#12510;&#12531;&#12489;
#&#20363;&#12360;&#12400;3&#12398;&#20493;&#25968;
which(a%%3 == 0)
[1] 4

#&#20301;&#32622;&#12391;&#12399;&#12394;&#12367;&#35201;&#32032;&#12434;&#21462;&#12426;&#20986;&#12377;&#22580;&#21512;
a[which(a%%3 == 0)]
[1] 6

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