<font color="#333333"><font><font face="trebuchet ms,sans-serif"><i>Aproveitando o comentário do Benilton, "</i></font></font></font><font color="#333333" face="'trebuchet ms', sans-serif"><i>isso se o henrique nao chegar humilhando" ;)</i></font><div>

<font color="#333333" face="'trebuchet ms', sans-serif"><i><br></i></font></div><div><font color="#333333" face="'trebuchet ms', sans-serif"><i>de que forma Henrique você adquiriu este know-how? O que você recomenda para leitura e apriomoramento?</i></font></div>

<div><font color="#333333" face="'trebuchet ms', sans-serif"><i><br></i></font><div><font color="#333333"><font><font face="trebuchet ms,sans-serif"><i><br></i></font></font></font></div><div><font color="#333333"><font><font face="trebuchet ms,sans-serif"><i><br clear="all">

</i></font></font></font>Atenciosamente,<br>Leandro Marino<br><a href="http://www.leandromarino.com.br">http://www.leandromarino.com.br</a> (Fotógrafo)<br><a href="http://est.leandromarino.com.br/Blog">http://est.leandromarino.com.br/Blog</a> (Estatístico)<br>

Cel.: + 55 21 9845-7707<br>Cel.: + 55 21 8777-7907<br><br>
<br><br><div class="gmail_quote">Em 15 de março de 2012 00:16, Henrique Dallazuanna <span dir="ltr"><<a href="mailto:wwwhsd@gmail.com">wwwhsd@gmail.com</a>></span> escreveu:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">

Tente assim:<div><br></div><div><div>library(gsubfn)</div><div><br></div><div>foo <- function(x, ...) {</div><div><span style="white-space:pre-wrap">        </span>sprintf(gsub("^(\\w+)\\s+.*\\s+(\\w+$)", "\\1\\2%s", x),</div>



<div>              sapply(strapply(d$NOM_PESSOA, '\\s+(.)'), </div><div>                     function(.x)paste(head(.x, n = -1), collapse = '')))</div><div>}</div><div><br></div><div>sprintf('%s%s%s', foo(d$NOM_PESSOA), d$DTA_NASC_PESSOA, foo(d$NOM_COMPLETO_MAE_PESSOA))</div>



<br><div class="gmail_quote">2012/3/14 Estevam Caixeta <span dir="ltr"><<a href="mailto:estevamcaixeta@gmail.com" target="_blank">estevamcaixeta@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">

<div><div class="h5">

Boa noite, possuo um banco de dados com 3 variáveis: <br>1- Nome da Pessoa<br>2- Data de nascimento<br>3- Nome completo da mãe<br><div><br></div><div>Uma melhor visão do banco pode ser dada assim:</div><div><br></div><div>





<div><div>                         NOM_PESSOA                                 DTA_NASC_PESSOA           NOM_COMPLETO_MAE_PESSOA</div><div>1      <b>A</b>NTONIO <b>D</b>O <b>N</b>ASCIMENTO VIEIRA                  17081968                       GENESIA <b>M</b>ARIA <b>D</b>O NASCIMENTO</div>





<div>2 ANTONIA<b> M</b>ARGARETE <b>R</b>OCHA <b>D</b>E ARAUJO        05091975                          MARIA <b>D</b>A <b>A</b>SSUNCAO ROCHA</div><div>3          JOAO <b>P</b>EDRO <b>A</b>RAUJO VIEIRA                        06031998                   ANTONIA <b>M</b>ARGARETE <b>R</b>OCHA <b>D</b>E ARAUJO</div>





<div>4            ERICA <b>D</b>E <b>A</b>RAUJO <b>V</b>IEIRA                             03112001                  ANTONIA <b>M</b>ARGARETE <b>R</b>OCHA <b>D</b>E ARAUJO</div><div><br></div></div></div><div>o que eu gostaria de fazer é criar uma quarta variável com a seguinte característica: PrimeiroNomeÚltimoNome<b>IniciaisNomeDoMeio</b>DataNascPrimeiroNomeMaeUltimoNomeMae<b>IniciaisNomeDoMeioMa</b>e para poder identificar cada indivíduo, já que no meu banco real eu possuo muitos homônimos. Para exemplificar, utilizando os nomes acima fornecidos, eu gostaria de criar algo do tipo:</div>





<div><br></div><div>1  ANTONIOVIEIRA<b>DN</b>17081968GENESIANASCIMENTO<b>MD</b></div><div>2  ANTONIAARAUJO<b>MR</b>D05091975MARIAROCHA<b>DA</b></div><div>3 JOAOVIEIRA<b>PA</b>06031998ANTONIAARAUJO<b>MRD</b></div><div>4 ERICAVIEIRA<b>DA</b>03112001ANTONIAARAUJO<b>MRD</b></div>





<div><br></div><div>Desde já agradeço.</div><div><br></div><div>Estevam C.M. Teixeira</div><div><br></div><div>PS: Coloquei a parte relacionada aos nomes do meio para tentar facilitar a visualização e compreensão do que eu gostaria de fazer</div>





<br></div></div><div class="im">_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></div></blockquote></div><span class="HOEnZb"><font color="#888888"><br>

<br clear="all"><div><br></div>-- <br>

Henrique Dallazuanna<br>Curitiba-Paraná-Brasil<br>25° 25' 40" S 49° 16' 22" O<br>
</font></span></div>
<br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br></div></div>