Hello,

Sorry, typo. It's rowSums(y), not x.

x[rowSums(y) > 0L, ]

Rui Barradas

Às 20:30 de 18/02/2022, Rui Barradas escreveu:
Hello,

Use ?rowSums and compare its result to 0. You want the sums greater than zero.


x <- "
   id  g
1  1 21
2  3 52
3  2 43
4  4 94
5  5 35"
y <- "
id g
1  1 1
2  0 0
3  0 1
4  1 0
5  1 0"

x <- read.table(textConnection(x), header = TRUE)
y <- read.table(textConnection(y), header = TRUE)

x[rowSums(x) > 0L, ]
#  id  g
#1  1 21
#2  3 52
#3  2 43
#4  4 94
#5  5 35


Hope this helps,

Rui Barradas

Às 18:32 de 18/02/2022, Li, Aiguo (NIH/NCI) [E] via R-help escreveu:
I have tow dataframes as below:
x
   id  g
1  1 21
2  3 52
3  2 43
4  4 94
5  5 35

y
   id g
1  1 1
2  0 0
3  0 1
4  1 0
5  1 0

Results dataframe I want is:
1 21
2 43
4 94
5 35

Basically I want to extract all the values in x which corresponding those values =1 in y.

I tried:
x[which(y==1),].  It gets:
id  g
1     1 21
4     4 94
5     5 35
NA   NA NA
NA.1 NA NA

But missing the row: 2 43.

Any help will be appreciated.

Thanks,
Aiguo

    [[alternative HTML version deleted]]

______________________________________________
R-help@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.

______________________________________________
R-help@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.

______________________________________________
R-help@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.

Reply via email to