subsetting !is.na for multiple conditions unexpected results

Question

I am trying to remove rows in a df when NA appear in two specific columns.

Example dataframe

tmp <- data.frame(state = c(1,  1, 2,  2, 3, 3, 4, 5),