<div><span style="font-size: medium; color: #3366ff;">Tem um arquivo para rodar e ver como fica?</span></div>
<div> </div>
<div><br />Olá,<br /><br />Segue uma sugestão:<br /><br /><br />library(tidyverse)<br />myfile <- read_lines("log.txt")<br /><br />names_col <- c("iteration", "total_loss", "loss_error", "rate", "time", "n_images")<br /><br />mydf <- myfile %>% <br /> str_subset("images$") %>% <br /> enframe(name = NULL) %>% <br /> separate(col = value, into = names_col, sep = "[:,]") %>% <br /> mutate_all(parse_number)<br /><br />mydf<br /><br /><br />Atenciosamente,<br />Max Richard Verginio<br /><br />_____________________________________<br />Sent from <a href="http://r-br.2285057.n4.nabble.com" target="_blank">http://r-br.2285057.n4.nabble.com</a><br /><br />_______________________________________________<br />R-br mailing list<br />R-br@listas.c3sl.ufpr.br<br /><a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" 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" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br /><br /></div>