Another solution isdf <- df[complete.cases(df[ ,-(1:2)]), ]
df <- data.frame(c(1:4,NA), 3:7,c("abc","abd",NA,1:2),c(NA,"be",NA,"c", "d"),c(NA,"f",NA, "xy", "1.89"))
names(df) <- paste0("V", 1:ncol(df))
df
V1 V2 V3 V4 V5
1 1 3 abc <NA> <NA>
2 2 4 abd be f
3 3 5 <NA> <NA> <NA>
4 4 6 1 c xy
5 NA 7 2 d 1.89
df <- df[complete.cases(df[ ,-(1:2)]) , ]
df
V1 V2 V3 V4 V5
2 2 4 abd be f
4 4 6 1 c xy
5 NA 7 2 d 1.89