Roney, boa tarde! Há alguns pacotes específicos para tratar de referências no R, como o RefManageR. Com ele é possível importar diretamente diversos formatos de arquivos como Bibtex ou Zotero e é bem provável que irá facilitar suas análises. cran.r-project.org/web/packages/RefManageR/vignettes/manual.pdf Embora a solução proposta por Gustavo Carvalho já deva lhe atender, também arrisquei um código pra fins de aprendizado... ### <code r> setwd("C:/LAB/Temp"); getwd() raw <- readLines("savedrecs.txt") raw2 <- gsub("(^..)(.*$)", "\\1_\\2", raw) df <- read.table(text=raw2, head=F, sep='_') rec <- cumsum(ifelse(df$V1=="PT",1,0)) df2 <- cbind(rec, df) df3 <- df2[grep("^AU|^DT|^PY|^VL|^BP", df2$V1),] reshape2::dcast(df3, V1~rec, value.var="V2") # V1 1 2 # 1 AU Lin, TH Brodeur-Campbell, M # 2 BP 314 320 # 3 DT Article Article # 4 PY 2012 2012 # 5 VL 116 116 t(reshape2::dcast(df3, V1~rec, value.var="V2")) # [,1] [,2] [,3] [,4] [,5] # V1 "AU" "BP" "DT" "PY" "VL" # 1 " Lin, TH" " 314" " Article" " 2012" " 116" # 2 " Brodeur-Campbell, M" " 320" " Article" " 2012" " 116" ### </ code> Atte., Éder Comunello <c <comunello.eder@gmail.com>omunello.eder@gmail.com> Dourados, MS - [22 16.5'S, 54 49'W] Em 22 de maio de 2014 17:07, Gustavo Carvalho <gustavo.bio@gmail.com>escreveu:
Assim serve?
test <- scan("savedrecs.txt", sep = "\n", what = "") matrix(test[grep("^AU|^DT|^PY|^VL|^BP", test)], ncol = 5, byrow = TRUE)
2014-05-22 17:48 GMT-03:00 Roney Fraga Souza <roneyfraga@gmail.com>:
Caros,
Tenho o seguinte arquivo: https://gist.github.com/roneyfraga/ca682b6193c75e7be4bf
Quero manter apenas as linhas que começam com AU, DT, PY, VL e BP no arquivo. O resultado seria:
AU Lin, TH DT Article PY 2012 VL 116 BP 314
AU Brodeur-Campbell, M DT Article PY 2012 VL 116 BP 320
Agora preciso que a cada 4 linhas estas sejam transpostas, de modo que ficaria assim:
V1 V2 V3 V4 V5
AU Lin, TH DT Article PY 2012 VL 116 BP 314
AU Brodeur-Campbell, M
DT Article PY 2012 VL 116 BP 320
Qualquer sugestão será bem vinda?
Atenciosamente, Roney
_______________________________________________ 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.
_______________________________________________ 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.