繁体   English   中英

在 str_extract() 之后将字符向量转换为 data.frame

[英]Convert character vector to data.frame after str_extract()

我有一个 dataframe:

head(objeto)
                                                      Edital
1                          GOVERNO DO ESTADO DE MINAS GERAIS
2 SECRETARIA-GERAL DA GOVERNADORIA DO ESTADO DE MINAS GERAIS
3                         EDITAL DA CONCORRÊNCIA Nº 001/2012
4                                        EDITAL DE LICITAÇÃO
5                                  CONCORRÊNCIA Nº. 001/2012
6                                      TIPO: TÉCNICA E PREÇO

我想在其中找到正则表达式“Objeto”,所以:

regex.objeto <- "(?<=Objeto: )([^.]+)"
objeto <- str_extract(edital, regex.objeto)

objeto

[1] "CONTRATAÇÃO DE EMPRESA PARA A PRESTAÇÃO DE SERVIÇOS\", \"ESPECIALIZADOS DE AFERIÇÃO DO DESEMPENHO E DA QUALIDADE DA\", \"CONCESSIONÁRIA MINAS ARENA GESTÃO DE INSTALAÇÕES ESPORTIVAS\", \n\"S"

结果是一个字符向量,但我想要一个 dataframe,没有这些符号\", \

我在想结果是这样的:

"CONTRATAÇÃO DE EMPRESA PARA A PRESTAÇÃO DE SERVIÇOS ESPECIALIZADOS DE AFERIÇÃO DO DESEMPENHO E DA QUALIDADE DA"

谢谢你们!

也许您可以使用gsub从字符串和"\n"中删除双引号。

objeto <- gsub('"|\n|,', '', objeto)

返回:

objeto
#[1] "CONTRATAÇÃO DE EMPRESA PARA A PRESTAÇÃO DE SERVIÇOS ESPECIALIZADOS DE AFERIÇÃO DO DESEMPENHO E DA QUALIDADE DA CONCESSIONÁRIA MINAS ARENA GESTÃO DE INSTALAÇÕES ESPORTIVAS S"

这也可以写成:

objeto <- gsub('["\n,]', '', objeto)

或使用str_remove_all库中的stringr

stringr::str_remove_all(objeto, '[\n",]')

这是str_replace_all的快捷方式

stringr::str_replace_all(objeto, '[\n",]', '')

暂无
暂无

声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2024 STACKOOM.COM