test.algorithm.load <- function(file = "data/algorithms.xml")
{
    return(classys.algorithm.load(file))
}