Question

I have a data.frame that has a number of duplicate rows, akin to something like this:

con <- textConnection(Lines <- "
First, Last, Address, Address 2, Email, Custom1, Custom2, Custom3
A, B, C, D, [e-mail],1,2,3
A, B, C, D, [e-mail],1,2,2
A, B, C, D, [e-mail],1,2,1
")
x <- read.csv(con)
close(con)

Now, when I de-duplicate, in the following manner:

x <- x[!duplicated(x[,c("email")]),]

Could you recommend a method for prioritizing those rows that contain Custom3=1? Or is there a better mechanism for de-duplication?

Answer 1

Try sorting before finding duplicates:

x <- x[order(x[,c(“Custom3”)]),]
x <- x[!duplicated(x[,c(“email”)]),]