Nothing
context("getProvidedFeatures")
test_that("getProvidedFeatures", {
expect_equal(getProvidedFeatures(testscenario1, steps = character(0), type = "instance"), character(0))
expect_equal(getProvidedFeatures(testscenario1, type = "instance"), getFeatureNames(testscenario1, "instance"))
# test with fake steps
testscenario = testscenario1
testscenario$desc$feature_steps = list(s1 = c("a", "b"), s2 = c("b", "c"))
testscenario$desc$features_deterministic = c("a", "b", "c")
testscenario$desc$features_stochastic = character(0)
expect_equal(getProvidedFeatures(testscenario, "s1", "instance"), c("a"))
expect_equal(getProvidedFeatures(testscenario, "s2", "instance"), c("c"))
expect_equal(getProvidedFeatures(testscenario6, steps = character(0), type = "algorithm"), character(0))
expect_equal(getProvidedFeatures(testscenario6, type = "algorithm"), getFeatureNames(testscenario6, "algorithm"))
expect_equal(getProvidedFeatures(testscenario6, type = "algorithm"), getFeatureNames(testscenario6, type = "algorithm"))
# test with fake steps
testscenario = testscenario6
testscenario$desc$algorithm_feature_steps = list(s1 = c("a", "b"), s2 = c("b", "c"))
testscenario$desc$algorithm_features_deterministic = c("a", "b", "c")
testscenario$desc$algorithm_features_stochastic = character(0)
expect_equal(getProvidedFeatures(testscenario, "s1", "algorithm"), c("a"))
expect_equal(getProvidedFeatures(testscenario, "s2", "algorithm"), c("c"))
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.