Extrair parte do texto de um string
Bom dia!!! Estou com um vetor de texto como nesse exemplo abaixo: texto_exemplo<-c("Laborclin#Laborclin Bioliquid - Oxidase/ Peroxidase","Labtest#Labtest Liquiform - Hexoquinase/ Desidrogenase","Siemens#Advia - Oxidase/ Peroxidase") 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: texto_fim<-c("Laborclin#Laborclin Bioliquid","Labtest#Labtest Liquiform","Siemens#Advia") 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... Obrigado a todos pela ajuda!!! Diogo JerônimoBacharel em Ciências Estatísticas - ENCE/IBGEMestre em Metrologia - PUC-Rio/PósMQIhttp://lattes.cnpq.br/8996149312896520
library(tidyverse) texto_exemplo<-c( "Laborclin#Laborclin Bioliquid - Oxidase/ Peroxidase", "Labtest#Labtest Liquiform - Hexoquinase/ Desidrogenase", "Siemens#Advia - Oxidase/ Peroxidase") DF <- data.frame(texto_exemplo) texto_fim <- DF %>% separate(texto_exemplo, into = c("antes", "depois"), sep=" -") %>% pull("antes") *Cid Edson Mendonça Póvoas* *AnovAgro <http://www.anovagro.com/>* *Engenheiro Agrônomo - **Data Scientist* *CREA : 051984991-4* *Técnico em Segurança do Trabalho * *Nº: **0012669/BA* *Tel: +55 73 99151-9565* *Lattes : *http://lattes.cnpq.br/2303498368142537 *LinkedIn :* http://br.linkedin.com/in/cidedson/ *Whatsapp :* https://wa.me/5573991519565 Em qui., 30 de set. de 2021 às 09:59, Diogo Jerônimo por (R-br) < r-br@listas.c3sl.ufpr.br> escreveu:
Bom dia!!! Estou com um vetor de texto como nesse exemplo abaixo:
texto_exemplo<-c( "Laborclin#Laborclin Bioliquid - Oxidase/ Peroxidase", "Labtest#Labtest Liquiform - Hexoquinase/ Desidrogenase", "Siemens#Advia - Oxidase/ Peroxidase")
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:
texto_fim<-c( "Laborclin#Laborclin Bioliquid", "Labtest#Labtest Liquiform", "Siemens#Advia")
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...
Obrigado a todos pela ajuda!!!
*Diogo Jerônimo* *Bacharel em Ciências Estatísticas - ENCE/IBGE* *Mestre em Metrologia - PUC-Rio/PósMQI* *http://lattes.cnpq.br/8996149312896520 <http://lattes.cnpq.br/8996149312896520>* _______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br 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.
Obrigado Cid, funcionou aqui!!! Vlw... Diogo JerônimoBacharel em Ciências Estatísticas - ENCE/IBGEMestre em Metrologia - PUC-Rio/PósMQICONRE: 8514 - SÉRIE Ahttp://lattes.cnpq.br/8996149312896520 Em quinta-feira, 30 de setembro de 2021 10:06:34 BRT, Cid Póvoas <cidedson@gmail.com> escreveu: library(tidyverse) texto_exemplo<-c( "Laborclin#Laborclin Bioliquid - Oxidase/ Peroxidase", "Labtest#Labtest Liquiform - Hexoquinase/ Desidrogenase", "Siemens#Advia - Oxidase/ Peroxidase") DF <- data.frame(texto_exemplo) texto_fim <- DF %>% separate(texto_exemplo, into = c("antes", "depois"), sep=" -") %>% pull("antes") Cid Edson Mendonça Póvoas AnovAgro Engenheiro Agrônomo - Data Scientist CREA : 051984991-4 Técnico em Segurança do Trabalho Nº: 0012669/BATel: +55 73 99151-9565Lattes : http://lattes.cnpq.br/2303498368142537 LinkedIn : http://br.linkedin.com/in/cidedson/Whatsapp : https://wa.me/5573991519565 Em qui., 30 de set. de 2021 às 09:59, Diogo Jerônimo por (R-br) <r-br@listas.c3sl.ufpr.br> escreveu: Bom dia!!! Estou com um vetor de texto como nesse exemplo abaixo: texto_exemplo<-c("Laborclin#Laborclin Bioliquid - Oxidase/ Peroxidase","Labtest#Labtest Liquiform - Hexoquinase/ Desidrogenase","Siemens#Advia - Oxidase/ Peroxidase") 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: texto_fim<-c("Laborclin#Laborclin Bioliquid","Labtest#Labtest Liquiform","Siemens#Advia") 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... Obrigado a todos pela ajuda!!! Diogo JerônimoBacharel em Ciências Estatísticas - ENCE/IBGEMestre em Metrologia - PUC-Rio/PósMQIhttp://lattes.cnpq.br/8996149312896520 _______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br 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.
participantes (2)
-
Cid Póvoas -
Diogo Jerônimo