tests/testsuite/test_max.R

Renv = new.env(parent = globalenv())

Renv$v = 1:10
Renv$a=1:5
Renv$b=pi

FLenv = as.FL(Renv)

test_that("check max",{
  result = eval_expect_equal({
    test1=max(v)
    test2=max(a,b)
    
  },Renv,FLenv)
  
})
Fuzzy-Logix/AdapteR documentation built on May 6, 2019, 5:07 p.m.