Boa tarde,

Tenho uma conjunto de dados que são mensagens de textos e preciso identificar os cpf's digitados nestas mensagens.

Quando os cpf's são digitados sem pontos ou traços, consigo extrair esta informação. mas preciso selecionar também os casos como por exemplo:

000.000.000-00

Uma amostra de 69 mensagens dos dados estão nest link

## CMR

d<-unlist(regmatches(dados[1:69,], gregexpr("[0-9,]+", dados[1:69,])))