What I have is something like this:

I want to replace it so that anything containing an @ or a number is replaced entirely with simply "Yes" is that possible? So it would output something like this:

CodePudding user response：

You can do:

df[] <- lapply(df, function(x) ifelse(grepl("@|\\d", x), "Yes", x))

df
#>   Contact ID Number
#> 1     Yes       Yes
#> 2     Yes       Yes
#> 3     Yes       Yes
#> 4     Yes       ---

Reproducible data

df <-  structure(list(Contact = c("Me@email", "You@memail", "072233498", 
"@email"), `ID Number` = c("576489", "984601", "256470", "---"
)), class = "data.frame", row.names = c(NA, -4L))

df
#>      Contact ID Number
#> 1   Me@email    576489
#> 2 You@memail    984601
#> 3  072233498    256470
#> 4     @email       ---

CodePudding user response：

str_replace(string, pattern, replacement) from the package "stringr"

str_replace(string, "@", "Yes")