Good morning all.

I am doing bagging with package caret. I need bagging for a classification
problem. I am working with " bag".

bag(x, y, B = 10, vars = NULL, bagControl = bagControl(), ...)

bagControl(fit = NULL,
           predict = NULL,
           aggregate = NULL,
           downSample = FALSE)


My fit function is:

svmFit <- function(x, y, ...)
  {
    library(e1071)
    svm(Score~., data = mydataset)
  }


My predict function is :


svmPred <- function(object, x)
  {
    predict(object, x)[,1]
  }


However, I don't know how to build the aggregate function.

Does anyone know how to develop it?

	[[alternative HTML version deleted]]

