Delete rows that are repeated for only some of the columns of the dataframe

Question

Considering the sample dataframe as:

df <- data.frame(a=c(rep(1,4),4,7,8), b=c(rep(4,4),6,8,3), 
                 c=c(rep("hey",4),"hi",&qu