Extract rowname of rows containing unique combination of TRUE FALSE

Question

I am attempting to extract the rowname that marking rows that contain a single TRUE value. Please see the following example.

                  Col1  Col2  Col3
Npat             FALSE  TRUE FALSE
Ttc30a1           TRUE FALSE FALSE
Gga1              TRUE  TRUE  TRUE
Gga3             FALSE FALSE FALSE
Gga2             FALSE FALSE  TRUE

I would like to extract the rownames of the rows containing a single unique "TRUE" value and retain information about which column the true value was in. The desired output might look like:

                   Col1  Col2  Col3
Npat             FALSE  TRUE FALSE
Ttc30a1           TRUE FALSE FALSE
Gga2             FALSE FALSE  TRUE

I attempted to use grep and -grep but couldn't get it recognize multiple values in multiple columns. I am sure there is a simple way to do this that I haven't been able to track down yet.

your question was easy, but consider to provide a reproducible example if possible: http://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example — Andre Elrico, Apr 12 '17 at 14:17

score 2 · Accepted Answer · edited Apr 12 '17 at 14:14

2

You can simply treat booleans as if they were numeric. In base R:

df[with(df, Col1 + Col2 + Col3  == 1) ,]

edited Apr 12 '17 at 14:14

989

12,579
5
31
53

answered Apr 12 '17 at 13:34

hdkrgr

1,666
1
12
22

Imagine 100 columns. – zx8754 Apr 12 '17 at 19:27
In that case go with one of the other answers. – hdkrgr Apr 12 '17 at 19:43

score 2 · Answer 2 · answered Apr 12 '17 at 14:02

Or you could use rowSums(df)==1:

df1 <-read.table(text="Row  Col1  Col2  Col3
Npat             FALSE  TRUE FALSE
Ttc30a1           TRUE FALSE FALSE
Gga1              TRUE  TRUE  TRUE
Gga3             FALSE FALSE FALSE
Gga2             FALSE FALSE  TRUE",header=TRUE, row.names=1,stringsAsFactors=FALSE)

df1[rowSums(df1)==1,]

         Col1  Col2  Col3
Npat    FALSE  TRUE FALSE
Ttc30a1  TRUE FALSE FALSE
Gga2    FALSE FALSE  TRUE

Andre Elrico · Answer 3 · 2017-04-12T14:00:17.540

1

somewhat similar approach: (more general solution)

use apply to sum row-wise.

df[apply(df,1,sum)==1,]

edited Apr 12 '17 at 14:00

answered Apr 12 '17 at 13:55

Andre Elrico

10,956
6
50
69

Extract rowname of rows containing unique combination of TRUE FALSE

3 Answers3