R !!! ifelse ifelse(条件, 合っている場合, 合ってない場合)