test.run <- function(...)
{
    data(iris)
    train = iris[,-5]
    labels = iris[,5]
    test = train
    classys.run(train,labels,test, ...)
}