comment utiliser ifelse dans r

> a = c(5,7,2,9)
> ifelse(a %% 2 == 0,"even","odd")
[1] "odd"  "odd"  "even" "odd" 
Frail Falcon