<html><head></head><body><div class="ydp4bb3a01eyahoo-style-wrap" style="font-family: bookman old style, new york, times, serif; font-size: 16px;"><div><div dir="ltr" data-setdir="false">Obrigado Cid, funcionou aqui!!! Vlw... </div><div><br></div><div class="ydp4bb3a01esignature"><div style="font-family:Helvetica, Arial, sans-serif;font-size:16px;"><div style="margin-bottom:0.0001pt;padding:0px;line-height:normal;background:white;"><i id="ydpcf278505yui_3_16_0_1_1497025264182_38508"><span id="ydpcf278505yui_3_16_0_1_1497025264182_38507" style="color:rgb(0, 0, 191);font-size:medium;"><font face="Courier New, courier, monaco, monospace, sans-serif" style="background-color: inherit;">Diogo Jerônimo</font></span></i></div><div style="margin-bottom:0.0001pt;padding:0px;line-height:normal;background:white;"><i id="ydpcf278505yui_3_16_0_1_1497025264182_38430"><span id="ydpcf278505yui_3_16_0_1_1497025264182_38429" style="color:rgb(0, 0, 191);font-size:medium;"><font face="Courier New, courier, monaco, monospace, sans-serif" style="background-color: inherit;">Bacharel em Ciências Estatísticas - ENCE/IBGE</font></span></i></div><div style="margin-bottom:0.0001pt;padding:0px;line-height:normal;background:white;"><i id="ydpcf278505yui_3_16_0_1_1497025264182_38309"><span id="ydpcf278505yui_3_16_0_1_1497025264182_38308" style="color:rgb(0, 0, 191);font-size:medium;"><font face="Courier New, courier, monaco, monospace, sans-serif" style="background-color: inherit;">Mestre em Metrologia - PUC-Rio/PósMQI</font></span></i></div><div style="margin-bottom:0.0001pt;padding:0px;line-height:normal;background:white;"><i id="ydpcf278505yui_3_16_0_1_1497025264182_38329"><span id="ydpcf278505yui_3_16_0_1_1497025264182_38328" style="color:rgb(0, 0, 191);font-size:medium;"><font face="Courier New, courier, monaco, monospace, sans-serif" id="ydpcf278505yui_3_16_0_1_1497025264182_38700" style="background-color: inherit;">CONRE: 8514 - SÉRIE A</font></span></i></div><div style="margin-bottom:0.0001pt;padding:0px;line-height:normal;background:white;"><i id="ydpcf278505yui_3_16_0_1_1497025264182_38323"><span id="ydpcf278505yui_3_16_0_1_1497025264182_38322" style="line-height:17.12px;color:rgb(0, 0, 191);font-size:medium;"><font face="Courier New, courier, monaco, monospace, sans-serif" id="ydpcf278505yui_3_16_0_1_1497025264182_38695" style="background-color: inherit;">http://lattes.cnpq.br/8996149312896520</font></span></i><br></div></div></div></div>
<div><br></div>
</div><div id="ydpbc5ada65yahoo_quoted_3778790255" class="ydpbc5ada65yahoo_quoted">
<div style="font-family:'Helvetica Neue', Helvetica, Arial, sans-serif;font-size:13px;color:#26282a;">
<div>
Em quinta-feira, 30 de setembro de 2021 10:06:34 BRT, Cid Póvoas <cidedson@gmail.com> escreveu:
</div>
<div><br></div>
<div><br></div>
<div><div id="ydpbc5ada65yiv3833636522"><div><div dir="ltr"><br clear="none">library(tidyverse)<br clear="none"><br clear="none">texto_exemplo<-c(<br clear="none"> "Laborclin#Laborclin Bioliquid - Oxidase/ Peroxidase",<br clear="none"> "Labtest#Labtest Liquiform - Hexoquinase/ Desidrogenase",<br clear="none"> "Siemens#Advia - Oxidase/ Peroxidase")<br clear="none"><br clear="none">DF <- data.frame(texto_exemplo)<br clear="none"><br clear="none">texto_fim <- DF %>% separate(texto_exemplo, into = c("antes", "depois"), sep=" -") %>% pull("antes")<br clear="none"><div><div class="ydpbc5ada65yiv3833636522gmail_signature" dir="ltr"><div dir="ltr"><div style="text-align:left;"><br clear="none"></div><div style="text-align:center;"><div style="text-align:left;"><font color="#073763"><b><i>Cid Edson Mendonça Póvoas</i></b></font></div><div style="text-align:left;"><font color="#073763"><b><i><br clear="none"></i></b></font></div><div style="text-align:left;"><b style="font-size:12.8px;color:rgb(7,55,99);"><i><a shape="rect" href="http://www.anovagro.com/" rel="nofollow" target="_blank">AnovAgro</a></i></b><br clear="none"></div><div style="text-align:left;"><b><i><font color="#073763">Engenheiro Agrônomo - </font></i></b><i style="color:rgb(7,55,99);"><b>Data Scientist</b></i><b><i><font color="#073763"> </font></i></b></div><div><div style="text-align:left;"><i style="color:rgb(7,55,99);"><b>CREA :</b> 051984991-4</i><b><font color="#073763"><i><br clear="none"></i></font></b></div><div style="text-align:left;"><b><font color="#073763"><i>Técnico em Segurança do Trabalho </i></font></b><br clear="none"></div><div style="text-align:left;"><i style="color:rgb(7,55,99);"><b>Nº: </b></i><span style="text-align:center;"><font color="#073763" style="background-color: inherit;"><i>0012669/BA</i></font></span></div><div style="text-align:left;"><i style="color:rgb(7,55,99);"><b>Tel: </b>+55 73 99151-9565</i></div><div style="text-align:left;"><font color="#073763"><span style="font-size:12.8px;"><b>Lattes : </b></span><span style="font-size:12.8px;"><a shape="rect" href="http://lattes.cnpq.br/2303498368142537" rel="nofollow" target="_blank">http://lattes.cnpq.br/2303498368142537</a></span><br clear="none"></font></div></div><div><div><div style="text-align:left;"><span style="font-size:12.8px;"><font color="#073763" style="background-color: inherit;"><b>LinkedIn :</b> <a shape="rect" href="http://br.linkedin.com/in/cidedson/" rel="nofollow" target="_blank">http://br.linkedin.com/in/cidedson/</a></font></span></div><div style="text-align:left;"><font color="#073763"><b>Whatsapp :</b> <a shape="rect" href="https://wa.me/5573991519565" rel="nofollow" target="_blank">https://wa.me/5573991519565</a></font></div></div></div></div></div></div></div><br clear="none"></div><br clear="none"><div class="ydpbc5ada65yiv3833636522gmail_quote"><div class="ydpbc5ada65yiv3833636522gmail_attr" dir="ltr">Em qui., 30 de set. de 2021 às 09:59, Diogo Jerônimo por (R-br) <<a shape="rect" href="mailto:r-br@listas.c3sl.ufpr.br" rel="nofollow" target="_blank">r-br@listas.c3sl.ufpr.br</a>> escreveu:<br clear="none"></div><blockquote class="ydpbc5ada65yiv3833636522gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex;"><div class="ydpbc5ada65yiv3833636522yqt8289710069" id="ydpbc5ada65yiv3833636522yqt08680"><div><div style="font-family:old times, serif;font-size:16px;"><div dir="ltr">Bom dia!!! Estou com um vetor de texto como nesse exemplo abaixo:</div><div dir="ltr"><br clear="none"></div><div dir="ltr"><div><div>texto_exemplo<-c(</div><div>"Laborclin#Laborclin Bioliquid - Oxidase/ Peroxidase",</div><div>"Labtest#Labtest Liquiform - Hexoquinase/ Desidrogenase",</div><div>"Siemens#Advia - Oxidase/ Peroxidase")</div><div><br clear="none"></div><div dir="ltr">Eu gostaria de aplicar uma extração de texto, de tal forma que o que estivesse depois do traço (" - ") fosse apagado, ficando o vetor de texto resultante assim:</div><div><br clear="none"></div><div>texto_fim<-c(</div><div>"Laborclin#Laborclin Bioliquid",</div><div>"Labtest#Labtest Liquiform",</div><div>"Siemens#Advia")</div><div><br clear="none"></div></div><div dir="ltr">Alguém saberia me ajudar? Eu tentei com o gsub, mas depois do traço, o tamanho dos textos para excluir depois do "-" seria variável, e então não extrairia exatamente o que eu quereria...</div><div dir="ltr"><br clear="none"></div><div dir="ltr">Obrigado a todos pela ajuda!!! </div><div dir="ltr"><br clear="none"></div></div><div><i id="ydpbc5ada65yiv3833636522gmail-m_7968265232921513046ydpcf278505yui_3_16_0_1_1497025264182_38508" style="font-family:Helvetica, Arial, sans-serif;"><span id="ydpbc5ada65yiv3833636522gmail-m_7968265232921513046ydpcf278505yui_3_16_0_1_1497025264182_38507" style="color:rgb(0,0,191);font-size:medium;"><font face="Courier New, courier, monaco, monospace, sans-serif" style="background-color:inherit;">Diogo Jerônimo</font></span></i></div><div><i id="ydpbc5ada65yiv3833636522gmail-m_7968265232921513046ydpcf278505yui_3_16_0_1_1497025264182_38430" style="font-family:Helvetica, Arial, sans-serif;"><span id="ydpbc5ada65yiv3833636522gmail-m_7968265232921513046ydpcf278505yui_3_16_0_1_1497025264182_38429" style="color:rgb(0,0,191);font-size:medium;"><font face="Courier New, courier, monaco, monospace, sans-serif" style="background-color:inherit;">Bacharel em Ciências Estatísticas - ENCE/IBGE</font></span></i></div><div><i id="ydpbc5ada65yiv3833636522gmail-m_7968265232921513046ydpcf278505yui_3_16_0_1_1497025264182_38309" style="font-family:Helvetica, Arial, sans-serif;"><span id="ydpbc5ada65yiv3833636522gmail-m_7968265232921513046ydpcf278505yui_3_16_0_1_1497025264182_38308" style="color:rgb(0,0,191);font-size:medium;"><font face="Courier New, courier, monaco, monospace, sans-serif" style="background-color:inherit;">Mestre em Metrologia - PUC-Rio/PósMQI</font></span></i></div><div><i id="ydpbc5ada65yiv3833636522gmail-m_7968265232921513046ydpcf278505yui_3_16_0_1_1497025264182_38323" style="font-family:Helvetica, Arial, sans-serif;"><span id="ydpbc5ada65yiv3833636522gmail-m_7968265232921513046ydpcf278505yui_3_16_0_1_1497025264182_38322" style="line-height:17.12px;color:rgb(0,0,191);font-size:medium;"><font id="ydpbc5ada65yiv3833636522gmail-m_7968265232921513046ydpcf278505yui_3_16_0_1_1497025264182_38695" face="Courier New, courier, monaco, monospace, sans-serif" style="background-color:inherit;"><a shape="rect" href="http://lattes.cnpq.br/8996149312896520" rel="nofollow" target="_blank">http://lattes.cnpq.br/8996149312896520</a></font></span></i><br clear="none"></div></div></div></div>_______________________________________________<br clear="none">
R-br mailing list<br clear="none">
<a shape="rect" href="mailto:R-br@listas.c3sl.ufpr.br" rel="nofollow" target="_blank">R-br@listas.c3sl.ufpr.br</a><br clear="none">
<a shape="rect" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="nofollow" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br clear="none">
Leia o guia de postagem (<a shape="rect" href="http://www.leg.ufpr.br/r-br-guia" rel="nofollow" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br clear="none">
</blockquote></div>
</div></div></div>
</div>
</div></body></html>