Hi, Please try ?rle
t.x <- x[order(x[,1],x[,2]),] t.x[cumsum(rle(t.x[,1])$lengths),] ----- A R learner. -- View this message in context: http://r.789695.n4.nabble.com/Fwd-duplicates-tp2306555p2306617.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ R-help@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.