Olá,
Segue uma sugestão:
library(tidyverse)
myfile <- read_lines("log.txt")
names_col <- c("iteration", "total_loss", "loss_error", "rate", "time",
"n_images")
mydf <- myfile %>%
str_subset("images$") %>%
enframe(name = NULL) %>%
separate(col = value, into = names_col, sep = "[:,]") %>%
mutate_all(parse_number)
mydf
Atenciosamente,
Max Richard Verginio
_____________________________________
Sent from http://r-br.2285057.n4.nabble.com
_______________________________________________
R-br mailing list
[email protected]
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.
