Test for sr_high class
Test for sr_search class
is.sr_facet(x)is.sr_high(x)is.sr_search(x)
is.sr_high(x)
is.sr_search(x)