<div dir="ltr"><br>library(tidyverse)<br><br>texto_exemplo<-c(<br>  "Laborclin#Laborclin Bioliquid - Oxidase/ Peroxidase",<br>  "Labtest#Labtest Liquiform - Hexoquinase/ Desidrogenase",<br>  "Siemens#Advia - Oxidase/ Peroxidase")<br><br>DF <- data.frame(texto_exemplo)<br><br>texto_fim <- DF %>% separate(texto_exemplo, into = c("antes", "depois"), sep=" -") %>%   pull("antes")<br><div><div dir="ltr" class="gmail_signature" data-smartmail="gmail_signature"><div dir="ltr"><div style="text-align:left"><br></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></i></b></font></div><div style="text-align:left"><b style="font-size:12.8px;color:rgb(7,55,99)"><i><a href="http://www.anovagro.com/" target="_blank">AnovAgro</a></i></b><br></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></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></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"><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 href="http://lattes.cnpq.br/2303498368142537" target="_blank">http://lattes.cnpq.br/2303498368142537</a></span><br></font></div></div><div><div><div style="text-align:left"><span style="font-size:12.8px"><font color="#073763"><b>LinkedIn :</b> <a href="http://br.linkedin.com/in/cidedson/" target="_blank">http://br.linkedin.com/in/cidedson/</a></font></span></div><div style="text-align:left"><font color="#073763"><b>Whatsapp :</b> <a href="https://wa.me/5573991519565" target="_blank">https://wa.me/5573991519565</a></font></div></div></div></div></div></div></div><br></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">Em qui., 30 de set. de 2021 às 09:59, Diogo Jerônimo por (R-br) <<a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a>> escreveu:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div><div style="font-family:"bookman old style","new york",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></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></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></div><div>texto_fim<-c(</div><div>"Laborclin#Laborclin Bioliquid",</div><div>"Labtest#Labtest Liquiform",</div><div>"Siemens#Advia")</div><div><br></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></div><div dir="ltr">Obrigado a todos pela ajuda!!! </div><div dir="ltr"><br></div></div><div><i id="gmail-m_7968265232921513046ydpcf278505yui_3_16_0_1_1497025264182_38508" style="font-family:Helvetica,Arial,sans-serif"><span id="gmail-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="gmail-m_7968265232921513046ydpcf278505yui_3_16_0_1_1497025264182_38430" style="font-family:Helvetica,Arial,sans-serif"><span id="gmail-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="gmail-m_7968265232921513046ydpcf278505yui_3_16_0_1_1497025264182_38309" style="font-family:Helvetica,Arial,sans-serif"><span id="gmail-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="gmail-m_7968265232921513046ydpcf278505yui_3_16_0_1_1497025264182_38323" style="font-family:Helvetica,Arial,sans-serif"><span id="gmail-m_7968265232921513046ydpcf278505yui_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="gmail-m_7968265232921513046ydpcf278505yui_3_16_0_1_1497025264182_38695" style="background-color:inherit"><a href="http://lattes.cnpq.br/8996149312896520" target="_blank">http://lattes.cnpq.br/8996149312896520</a></font></span></i><br></div></div></div>_______________________________________________<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" rel="noreferrer" 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" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br>
</blockquote></div>