[R-br] Dúvida para conversão de um output em *txt para data.frame usando tidyverse
ASANTOS
alexandre.santos em cas.ifmt.edu.br
Seg Set 28 18:18:45 -03 2020
Estoucomumproblemaparacriarumdataframeapartirdeumconjuntodeduaslinhasdeinteresse,
sendo:
library(tidyverse)
myfile<-read_lines("https://raw.githubusercontent.com/Leprechault/yolov3ants/master/yolov3-lca_416_conv81_sub_8_log.txt")
head(myfile)
Emalgumaspartedomeuarquivoeutenhotrechosquequeroextrairquesão:
#Last accuracy mAP em 0.5 = 73.10 %
#1585: 0.299288, 0.423193 avg loss, 0.001000 rate, 3.927486 seconds, 101440 images
Nessespontoseuqueroremoverasinformações:mAP em 0.5 =
73.10 % (naprimeiralinha), 1585:e0.423193avgloss (dalinhaseguinte)
ecriarumdata.framefinalqueseria:
# iteration avg_loss mAP
# 1585 0.423193 73.10
# ...
masquandotentoremoverainformaçãodeinteresseeporserbeginnernotidyverse,
nãotenhosucesso, sendoaminhatentativana seguinte direção:
names_col2 <- c("iteration", "avg_loss", "mAP")
mydf <- myfile %>%
str_subset("Last accuracy mAP em 0.5 =") %>%
enframe(name = NULL) %>%
separate(col = value, into = names_col2, sep = "[=,]") %>%
mutate_all(parse_number)
head(as.data.frame(mydf))
Alguémpoderiamedarumaluz?
Obrigado,
Alexandre
--
Alexandre dos Santos
Geotechnologies and Spatial Statistics applied to Forest Entomology
Instituto Federal de Mato Grosso (IFMT) - Campus Caceres
Caixa Postal 244 (PO Box)
Avenida dos Ramires, s/n - Vila Real
Caceres - MT - CEP 78201-380 (ZIP code)
Phone: (+55) 65 99686-6970 / (+55) 65 3221-2674
Lattes CV: http://lattes.cnpq.br/1360403201088680
OrcID: orcid.org/0000-0001-8232-6722
ResearchGate: www.researchgate.net/profile/Alexandre_Santos10
Publons: https://publons.com/researcher/3085587/alexandre-dos-santos/
--
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20200928/242a563a/attachment.html>
Mais detalhes sobre a lista de discussão R-br