Это одна из тех вещей, которых я пытаюсь достичь. Почему-то думаете, что использование purrr и "modify_if" будет более эффективным? В приложении он будет быстро расти, поэтому важны скорость / эффективность. Это выглядит просто, но то, что мне нужно сделать, потребует нескольких команд на каждом уровне ifelse.
vec1 <- c(1,2,3)
vec1 <- sapply(
vec1,function(x) ifelse(x == 1,2,
ifelse (x == 2,3,
ifelse (x == 3,1,0))))
vec1 #output
[1] 2 3 1
Кроме того, как я могу закодировать ifelse
, если другого нет, т.е. не встретил я просто ничего не хочу делать? Просто используйте оператор if
вместо ifelse
.
Thx, J