# 2.
tempos <- read.csv("TP1/DadosTP1AnaliseDesempenhocsv.csv", TRUE, ";")
tempos.df <- as.data.frame(tempos)

# a)
erros.relativos <- data.frame(
  ACO = tempos[[3]] / tempos[[2]],
  PSO = tempos[[4]] / tempos[[2]],
  ABC = tempos[[5]] / tempos[[2]]
)