replace_with_na_if function

Replace values with NA based on some condition, for variables that meet some predicate