[R] if else with 4 conditions problem

[Rui Barradas]

Hello,

It's just a sequence of ifelse instructions.

dat <- read.table(text = "
    A               B
    1               1
    1               0
    0               1
    0               0
", header = TRUE)

dat$A1 <- ifelse(dat$A == 1 & dat$B == 1, 1, 0)
dat$A2 <- ifelse(dat$A == 1 & dat$B == 0, 1, 0)
dat$A3 <- ifelse(dat$A == 0 & dat$B == 1, 1, 0)
dat$A4 <- ifelse(dat$A == 0 & dat$B == 0, 1, 0)
dat


Hope this helps,

Rui Barradas


On 5/27/2018 3:13 PM, smart hendsome via R-help wrote:
> Hi everyone,
> I have two columns:
>     A               B
>     1               1   1               0
>     0               1
>     0               0
> 
> I have 4 categories which are:
> 1) if A = 1 and B =1 then A1 = 1, else A2 = 0, A3 = 0, A4 = 0
> 2) if A = 1 and B =0 then A1 = 0, else A2 =1, A3 = 0, A4 = 0
> 
> 3) if A = 0 and B = 1 then A1 = 0, else A2 = 0, A3 = 1, A4 = 0
> 
> 4) if A = 0 and B =0 then A1 = 0, else A2 = 0, A3 = 0, A4 = 1
> 
> I want the data become like below:
>     A        B      A1      A2    A3     A4
>     1        1       1        0        0      0   1        0       0        1        0      0
>     0        1       0        0        1      0
>     0        0       0        0        0      1
> Anyone can help me? Many Thanks.
> Regards,
> Zuhri
> 
> 
> |  | Virus-free. www.avast.com  |
> 
> 
> 	[[alternative HTML version deleted]]
> 
> ______________________________________________
> R-help using r-project.org mailing list -- To UNSUBSCRIBE and more, see
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>