[R] Delete row if two values in a matrix are equal

[Rui Barradas]

Hello,

First, two notes:
1. 'var' is a really bad name for a variable, it already is an R function.
2. Your matrix seems more like a data.frame. The difference is important 
because data.frames by default coerce character strings to factors. I 
have tried to make the code work if this is the case or not.


vr <- read.table(text="
Ref_Pos Ref_Allele Var_Allele Var_Freq
      1             A                  A                 100
      2                    T                  G                  50
      3                    G                  G                 100
      4                    G                  T                  45
      5                     T                  C                  80
", header = TRUE)

yes <- as.character(vr[, "Ref_Allele"]) != as.character(vr[, "Var_Allele"])
vr[yes, ]



Hope this helps,

Rui Barradas

Em 26-10-2012 15:26, JDINIS escreveu:
> Hi all and thank you for your time.
>
> I would like to delete rows from this matrix I call "var" if the character
> in Ref_Allele is equal to the character in Var_Allele. I have attached a
> before and after, to help my poor explanation. If someone could provide me
> with some code, or some guidance I would really appreciate it.
>
> Thank you again.
>
> "Before"
>> var
> Ref_Pos	Ref_Allele	Var_Allele	Var_Freq
>       1         	A	              A	             100
>       2	                T	              G	              50
>       3	                G	              G	             100
>       4	                G	              T	              45
>       5	                 T	              C	              80
>
>
>
> "After"
> Ref_Pos	Ref_Allele	Var_Allele	Var_Freq
>       2	                T	              G	              50
>       4	                G	              T	              45
>       5	                 T	              C	              80
>
>
>
>
> --
> View this message in context: http://r.789695.n4.nabble.com/Delete-row-if-two-values-in-a-matrix-are-equal-tp4647554.html
> Sent from the R help mailing list archive at Nabble.com.
>
> ______________________________________________
> R-help at r-project.org mailing list
> 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.