This functions generates a new experiment incluing the methods that obtained an equivalent performance with statisticall significance in the multiple comparison test i.e. those whose hypotheses were not rejected
A testMultipleControl test object
an experiment object
1 2 3 4 5 6 7 8 9 10
# First we create an experiment from the wekaExperiment problem and prepare # it to apply the test: experiment <- expCreate(wekaExperiment, name="test", parameter="fold") experiment <- expReduce(experiment, "fold", mean) experiment <- expInstantiate(experiment, removeUnary=TRUE) # Then we perform a testMultiplePairwise test procedure test <- testMultipleControl(experiment, "trainingTime", "min") expExtract(test)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.