Wagner, bom dia!
Segue uma ideia...
### <code r>
names <- c("Antônio João Carneiro", "Antônio Souza Brás Silva",
"Bento Munhoz Rocha Souza", "Carlos Henrique Omanneve",
"Damasceno Quiley", "Eustácio Silva Lima", "Fábio Enolair",
"Gustavo Byroleth")
names2 <- strsplit(names, ' ')
terms <- unlist(lapply(names2, length)); terms
n <- length(terms)
sapply(1:n, function(x) names2[[x]][1]) # Primeiro
sapply(1:n, function(x) names2[[x]][terms[x]]) # Último
sapply(1:n, function(x) paste(names2[[x]][-c(1,terms[x])], collapse=" ")) #
Intermediários
sapply(1:n, function(x) (names2[[x]][-c(1,terms[x])])[1]) # Segundo nome...
### </code>
================================================
Éder Comunello
Agronomist (UEM), MSc in Environ. Sciences (UEM)
DSc in Agricultural Systems Engineering (USP/Esalq)
Brazilian Agricultural Research Corporation (Embrapa)
Dourados, MS, Brazil |<O>|
================================================
GEO, -22.2752, -54.8182, 408m
UTC-04:00 / DST: UTC-03:00
Em 15 de maio de 2016 06:55, Wagner Tassinari <[email protected]>
escreveu:
> Olá pessoal, tudo bem ?
>
> Gostaria de um help, estou querendo separar os nomes pelo: primeiro,
> segundo e último nome de uma pessoa.
> Para separar o primeiro e o último, eu utilizo os respectivos comandos:
>
> banco$firstname = sapply(strsplit(banco$nome, ' '), function(x) x[1])
> banco$lastname = sapply(strsplit(banco$nome, ' '), function(x)
> x[length(x)])
>
> Gostaria de ter uma idéia para separar o segundo nome baseado nesses
> comandos,
>
> Obrigado e abs a todos,
> -----
> 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
> [email protected]
> ----------------------------------------------------------------------
>
>
> _______________________________________________
> R-br mailing list
> [email protected]
> 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.
>
_______________________________________________
R-br mailing list
[email protected]
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.
