Error in `contrib.url(repos, "source")`: trying to use CRAN without setting a mirror

optimization_test <- c("min", "min", "max", "max")
criterio = c("min", "min", "max", "max"),
phi_j = c(0.759814815, 0.954583333,	0.908148148,	0.572592593),  # valores calculados manualmente ou com uma referência conhecida
psi_j = c(0.237803376, 0.298761139, 0.284228066, 0.179207419)   # valores calculados manualmente ou com uma referência conhecida
# Garantir que os nomes das linhas e dos vetores de valores estejam no formato correto
test_that("Função psicalc produz o resultado esperado", {
expect_equal(result, expected_result, tolerance = 1e-8)

# valores calculados manualmente ou com uma referência conhecida
"Função psicalc produz o resultado esperado"