With the following data frame:
d <- structure(list(n = c(2, 3, 5), s = c(2, 8, 3),t = c(2, 18, 30)), .Names = c(\"n\", \"s\",\"t\"), row.names = c(NA, -3L
Here's one possible approach, which compares all columns to the first
d[rowSums(d == d[,1]) != ncol(d),] # n s t # 2 3 8 18 # 3 5 3 30