Olá Wagner,

Acredito que isto resolva:

extrai <- function(x) return(x[1])
sapply(strsplit(nomes, " NAO"), extrai)

Abraço



Paulo Dick
Estatístico
Mestre em Epidemiologia em Saúde Pública
Tel.: (55 21) 99591-2716

Em 24 de maio de 2016 12:36, Wagner Tassinari <wtassinari@gmail.com> escreveu:
Olá pessoal,

Tenho a seguinte amostra com os nomes:

[1] "PIETRO LUCAS DA SILVA NAO MORA"      "ROSECLEIA DE JESUS PORTUGAL NAO MORA MA"     
[3] "TAINA OLIVEIRA NAO MORA"             "DANIELLE DE ALMEIDA MELO DA SILVA NAO E"     
[5] "DAVI FERREIRA DE CARVALHO NAO RESIDE NE"      "EDNALDO DA SILVA NAO RESIDE MAIS NA ARE"     
[7] "MARCIA FERREIRA DE MORAIS NAO RESIDE NE"      "MARIA JOANA LUDGERIO DE PAULO NAO MORA"      
[9] "ROSANGELA DE BRITO NAO R"      "NATANAEL DOS SANTOS MACENA NAO MORA MAIS"    


Esses nomes apresentam imperfeições no preenchimento, daí eu gostaria de excluir tudo que está após a palavra NAO e criar outra variável para os nomes ficarem limpos dessa forma:

[1] "PIETRO LUCAS DA SILVA"      "ROSECLEIA DE JESUS PORTUGAL"     
[3] "TAINA OLIVEIRA"             "DANIELLE DE ALMEIDA MELO DA SILVA"     
[5] "DAVI FERREIRA DE CARVALHO"           "EDNALDO DA SILVA"     
[7] "MARCIA FERREIRA DE MORAIS"           "MARIA JOANA LUDGERIO DE PAULO"      
[9] "ROSANGELA DE BRITO "                 "NATANAEL DOS SANTOS MACENA"    

Obrigado pessoal
-----
Wagner S. Tassinari
Departamento de Matemática
Universidade Federal Rural do Rio de Janeiro.
BR-465, Km 7 - Seropedica, RJ - Brasil
CEP: 23890-000
Cel: (21) 96488-5982 (WhatsApp)
Skype: wagner.tassinari
wtassinari@gmail.com
----------------------------------------------------------------------


_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.