inst/unitTests/local_test_query_transform.R

if(FALSE) {
  library( "RUnit" )
  library( "ENCODExplorer" )
}

my.term = "mcf7"
my.transfo = "^m[ ,-]?c[ ,-]?f[ ,-]?7"

checkEquals(query_transform(my.term), my.transfo,
            msg = "1.Error in query transformation")

my.term = "mcf-7"
checkEquals(query_transform(my.term), my.transfo,
            msg = "2.Error in query transformation")

my.term = "mcf 7 "
checkEquals(query_transform(my.term), my.transfo,
            msg = "3.Error in query transformation")

my.term = "mcf 7"
checkEquals(query_transform(my.term), my.transfo,
            msg = "4.Error in query transformation")

Try the ENCODExplorer package in your browser

Any scripts or data that you put into this service are public.

ENCODExplorer documentation built on Nov. 8, 2020, 5:11 p.m.