Replace is_na() with rlang::is_lgl_na()

Replace is_na() with rlang::is_lgl_na() #205