diff --git a/src/test/cases/branin.R b/src/test/cases/branin.R index 9c5dca8..71f3050 100644 --- a/src/test/cases/branin.R +++ b/src/test/cases/branin.R @@ -21,7 +21,7 @@ argmin3.f = c(0.5427730, 0.15) min.f = 0.3978874 library(testthat) -if (!isTRUE(test_that("f(armgin.f) == f.min",{expect_equal(f(matrix(argmin1.f,nrow=1))[1,1],min.f,tolerance = .0001)}))) quit(status=1) +if (!isTRUE(test_that("f(armgin.f) == f.min",{expect_equal(f(matrix(argmin1.f,nrow=1))[1],min.f,tolerance = .0001)}))) quit(status=1) test = function(algorithm_file) { results = run.algorithm(algorithm_file, options=list(yminimization='true',x0='0.5',ytol='0.01'),fun=list(input=input.f,output=output.f,fun=f)) diff --git a/src/test/cases/branin_-510_015.R b/src/test/cases/branin_-510_015.R index a591216..c909a52 100644 --- a/src/test/cases/branin_-510_015.R +++ b/src/test/cases/branin_-510_015.R @@ -21,7 +21,7 @@ argmin3.f = c(0.5427730*15-5, 0.15*15) min.f = 0.3978874 library(testthat) -if (!isTRUE(test_that("f(armgin.f) == f.min",{expect_equal(f(matrix(argmin1.f,nrow=1))[1,1],min.f,tolerance = .0001)}))) quit(status=1) +if (!isTRUE(test_that("f(armgin.f) == f.min",{expect_equal(f(matrix(argmin1.f,nrow=1))[1],min.f,tolerance = .0001)}))) quit(status=1) test = function(algorithm_file) { results = run.algorithm(algorithm_file, options=list(yminimization='true',x0='0.5',ytol='0.01'),fun=list(input=input.f,output=output.f,fun=f))