Uma possível forma é usar o case_when
do dplyr
. Fiz alguns testes e não encontrei a limitação de muitos casos como o ifelse
possui. No seu caso, ficaria assim:
case_when(
v0211==1 & v0212==2 ~ 0,
v0211==1 & v0212==4 ~ 1,
v0211==1 & v0212==6 ~ 1,
v0211==3 & v0213==1 ~ 0,
v0211==3 & v0213==3 ~ 1,
TRUE ~ as.numeric(NA)
)
Veja que cada caso é definido da forma condicao ~ resultado se verdadeiro
e separado por vírgulas. As condições são avaliadas sequencialmente, assim como o ifelse
. A última condição TRUE ~ NA
, indica que o valor NA
será incluido caso nenhuma das aneteriores seja correspondida. Para ter a função case_when
, carregue o pacote com library(dplyr)
.
Note que: o limite de chamadas não é relacionado ao ifelse
e sim ao R. O R
limita o número de funções que podem ser chamadas uma dentro da outra (chamado de parse context). Veja este exemplo:
f <- function(x) return(1)
f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f(f())))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))
Error: contextstack overflow at line 1
O limite do R é definido a 50 chamadas. E é definido nesta linha do código fonte do R. Ou seja, para alterar este limite você precisa mudar o código fonte do R. Segue uma referência no stackoverflow