if_mojiretu.r
if (length(grep(pattern="XX", x=i)) > 0){
Y <- 500
} else{
Y <- 50000
}
print(Y)
文字列オブジェクト i の中に文字列”XX"が含まれていたらgrep()は1を返すのでTRUE、含まれていなければgrep()はinteger(0)を返す。integer(0)は整数型のデータに何も格納されていない状態なので、それにlength()を取ると0を返してくれる。
追記。
grepl()を使えば返り値を論理型にできるので、こっちのほうがよい。