data(iris)

train = iris[,-5]
labels = iris[,5]

##cat("labels:\n")
##print(labels)
##cat("ind:\n")
##print(class.ind(labels))

###ret1 = nnet(x = train, y = class.ind(labels), size = 2, trace = FALSE)#, size = 2, trace = FALSE)
#ret1 = lda(data = data.frame(cbind(labels,train)))
#ret1 = lda(x = train,grouping = labels)
ret1 = classys.classifier.algorithm(train = iris[,-5],labels = iris[,5],classys.algos[3,])
#ret2 = rpart(data = data.frame(cbind(iris[,5],iris[,-5])), formula = iris[,5] ~ .)
#ret2 = tree(labels ~ .,data.frame(cbind(labels,train)))

#ret1 == ret2
#tt.ret = list(ret1,ret2)