R新しい列に値を割り当てるロジックがある場合

Question

列にある3つの可能な値のいずれかに基づいて新しい列を作成する必要があります。

これらはルールです：

If it has c somewhere in it, the new column should be assigned "third" 
If it has b, but not c somewhere in it, the new column should be assigned "second" 
If it has a but not b or c somewhere in it, the new column should be assigned "first" 

ここに私のサンプルコードは

x <- c('a,b,c', 'a', 'a,b') 

myLetters <- data.frame(x) 

setnames(myLetters, "theLetter") 

sapply(myLetters$, theLetter, function(x) 
if ('c' %in% myLetters$theLetter) { 
    myLetters$letterStatus <- "third" 
} else if ('b' %in% myLetters$theLetter) { 
    myLetters$letterStatus <- "second" 
} else if ('a' %in% myLetters$theLetter) { 
    myLetters$letterStatus <- "first" 
} 
) 

だこれは私がmyLetters $ letterStatusのためのサンプルデータに基づいて、行ごとに必要なデータです。

Row 1: third 
Row 2: first 
Row 3: second 

現在、私は「最初の」「最初の」「最初の」「最初の」ものを取得していますが、理由はわかりません。

私はこれをどのように解決することができ、なぜ私は各行の最初の理由を知っていますか？

おかげで結果を得るために、ベクトル化（私たちにRの贈り物）を使用して

Answer 1

は：

x <- c('a,b,c', 'a', 'a,b') 
myLetters <- data.frame(x) 
# myLetters 
# x 
# 1 a,b,c 
# 2  a 
# 3 a,b 

myLetters$x1 = ifelse(grepl("c",myLetters$x), "third", ifelse(grepl("b",myLetters$x),"second", "first"))