R_Tips0 のバックアップ(No.1)

思い出さないなぁ．もっと簡単な方法があったはずだが，とりあえず，こんな方法でも実現できる．

は，まず二つの組に登場するカテゴリを一緒くたにしてベクトルとして扱い，それぞれの組のカテゴリが，この共通ベクトルの何番目にあるかを調べるという方策がある．

x <- c("A","C", "D")
y <- c("A","B","C")
z <- unique(c(x,y))

#y の各要素がzの何番目にあるか知りたい

y %in% z #意味無し

# こんなループ処理が必要なのかなぁ?

for( i in 1:length(y)){
 for(j in 1:length(z)){
   if(y[i] == z[j]){
     cat(j)
     cat("\n")
  }
}

# いや，絶対もっと簡単な方法があったはず

アールメカブ