Muito obrigado pela ajuda Cid, mas ainda tem alguma informação que está
sendo perdida, pois:
myfile <-
vroom("https://raw.githubusercontent.com/Leprechault/yolov3ants/master/result_imgval.txt;,
delim = "\t", skip = 5)
myfile <- myfile %>% rename(dados = `folder input=imgval/ and
Parece q ainda tinha um erro no método de seleção do str_detect, agora ta
100%
library(vroom)
> library(tidyverse)
> #Download dos dados
> myfile <-
> vroom("
> https://raw.githubusercontent.com/Leprechault/yolov3ants/master/result_imgval.txt;,
> delim = "\t", skip = 5)
> myfile <- myfile %>%
Desconsidera o outro, tinha um erro
library(vroom)
library(tidyverse)
#Download dos dados
myfile <-
vroom("
https://raw.githubusercontent.com/Leprechault/yolov3ants/master/result_imgval.txt;,
delim = "\t", skip = 5)
myfile <- myfile %>% rename(dados = `folder input=imgval/ and
library(vroom)
library(tidyverse)
#Download dos dados
myfile <-
vroom("
https://raw.githubusercontent.com/Leprechault/yolov3ants/master/result_imgval.txt;,
delim = "\t", skip = 5)
myfile <- myfile %>% rename(dados = `folder input=imgval/ and
output=backup/`)
myfile <- myfile %>%
Prezados membros,
Surgiu um novo problema para a extração de informações em um arquivo
*txt quando eu tenho que computar também quando eu não tenho determinada
informação (lca) e preciso considerar isso no meu data.frame final.
Em meu exemplo:
#Pacotes
library(vroom)
library(tidyverse)
Obrigado Cid, problema perfeitamente resolvido!!!
head(mydf2)
interation avg_loss mAP 1 1001 0.523133 58.6 2 1003 0.496871 58.6 3 1005
0.523653 58.6 4 1007 0.535484 58.6 5 1009 0.530135 58.6 6 1011 0.524369
58.6 tail(mydf2) interation avg_loss mAP 1495 3989 0.371550 79.49 1496
3991 0.358697
library(vroom)
library(tidyverse)
myfile <- vroom("
https://raw.githubusercontent.com/Leprechault/yolov3ants/master/yolov3-lca_416_conv81_sub_8_log.txt;,
delim = "\t")
head(myfile)
str(myfile)
myfile <- myfile %>% rename(dados = `Prepare additional network for mAP
calculation...`)
myfile <-
library(vroom)
library(tidyverse)
myfile <- vroom("
https://raw.githubusercontent.com/Leprechault/yolov3ants/master/yolov3-lca_416_conv81_sub_8_log.txt;,
delim = "\t")
head(myfile)
str(myfile)
myfile <- myfile %>% rename(dados = `Prepare additional network for mAP
calculation...`)
myfile <-