<div dir="ltr">Caro Jobenil, veja se o código abaixo ajuda alguma coisa.<br><div><br></div><div><div>df1 <- data.frame(concatenado = c("1 _ 307", "22 _ 105", "12 _ 303", "6 _ 201"), var1 = 1:4, var2 = rnorm(4), stringsAsFactors = F)</div><div>df2 <- data.frame(concatenar = c("500002_01 _ 307", "5001245_05 _ 303", "500033_22 _ 105",</div><div> "501256_12 _ 303", "500345_06 _ 201"), var3 = runif(5), var4 = rnorm(5), stringsAsFactors = F)</div><div><br></div><div># Limpar </div><div>df1$concatenado <- gsub("[[:punct:]]| ", "", df1$concatenado)</div><div>df2$concatenar <- gsub("[[:punct:]]| ", "", df2$concatenar)</div><div><br></div><div># Tratar</div><div>df2$concatenar <- gsub(".*(\\d{8})$", "\\1", df2$concatenar)</div><div>df1$concatenado <- sprintf("%08.0f", as.numeric(df1$concatenado))</div><div><br></div><div><br></div></div></div><div class="gmail_extra"><br><div class="gmail_quote">Em 26 de junho de 2018 11:36, Jobenil Luiz Magalhães Júnior via R-br <span dir="ltr"><<a href="mailto:r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a>></span> escreveu:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><img width="0" height="0" class="m_3334090830160051358mailtrack-img" alt="" style="display:flex" src="https://mailtrack.io/trace/mail/dfb2a1b3309a01df0dda556a8e985ae02ce24ff7.png?u=477019"><div></div><br><div>Boa tarde pessoal,</div><div><br></div><div>Estou tentando realizar o merge em dois dataframes, porém as respectivas colunas são ligeiramente diferentes:</div><div><br></div><div>df1 <- (concatenado = c("1 _ 307", "22 _ 105", "12 _ 303", "6 _ 201"), var1 = 1:4, var2 = rnorm(4))</div><div>df2 <- (concatenar = c("500002_01 _ 307", "5001245_05 _ 303", "500033_22 _ 105",</div><div><span style="white-space:pre-wrap"> </span> "501256_12 _ 303", "500345_06 _ 201", var3 = runif(5), var4 = rnorm(5))</div><div><br></div><div>Quero usar os 8 últimos caracteres da variável df2$concatenar e comparar com as da variável df1$concatenado.</div><div>Noto que tenho dois problemas: 1) completar com 0 "zeros" à esquerda os valores à esquerda em df1$concatenado, quando forem menores do que 10.</div><div>2) Extrair os 8 caracteres à direita da variável df2$concatenar.</div><div><br></div><div>Como posso equalizar as duas colunas?</div><div>Agradeço desde logo qualquer ajuda que puderem dispensar.</div><div>Atenciosamente</div><div>Jobenil Júnior</div><div> </div><div> </div><br><br><div class="m_3334090830160051358mt-signature">
<table border="0" cellpadding="8" cellspacing="0">
<tbody><tr>
<td>
<a href="https://mailtrack.io?utm_source=gmail&utm_medium=signature&utm_campaign=signaturevirality5&" style="text-decoration:none" target="_blank">
<img src="https://s3.amazonaws.com/mailtrack-signature/sender_notified.gif" alt="Mailtrack" width="32" height="32">
</a>
</td>
<td>
<span style="color:#777">Remetente notificado por</span> <br>
<a href="https://mailtrack.io?utm_source=gmail&utm_medium=signature&utm_campaign=signaturevirality5&" class="m_3334090830160051358mt-install" style="color:#4374f7" target="_blank">Mailtrack</a>
<span style="color:transparent;font-size:0">26/06/18 11:37:17</span>
</td>
<td>
</td>
</tr>
</tbody></table>
</div></div>
<br>______________________________<wbr>_________________<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" rel="noreferrer" target="_blank">https://listas.inf.ufpr.br/<wbr>cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-<wbr>guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br><br clear="all"><div><br></div>-- <br><div class="gmail_signature" data-smartmail="gmail_signature">Marcos F. Silva<br><a href="http://sites.google.com/site/marcosfs2006" target="_blank">http://sites.google.com/site/marcosfs2006</a></div>
</div>