Remove rows with all or some NAs (missing values) in data.frame

Question

I\'d like to remove the lines in this data frame that:

a) contain NAs across all columns. Below is my example data frame.

Answer 1

This will return the rows that have at least ONE non-NA value.

final[rowSums(is.na(final))

This will return the rows that have at least TWO non-NA value.

final[rowSums(is.na(final))<(length(final)-1),]