diff options
Diffstat (limited to 'R')
| -rw-r--r-- | R/gensvm.grid.R | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/R/gensvm.grid.R b/R/gensvm.grid.R index 3dad021..613b718 100644 --- a/R/gensvm.grid.R +++ b/R/gensvm.grid.R @@ -142,6 +142,11 @@ #' acc.pct <- function(yt, yp) { return (100 * sum(yt == yp) / length(yt)) } #' grid <- gensvm.grid(x, y, scoring=acc.pct) #' +#' # With RBF kernel and very verbose progress printing +#' pg <- expand.grid(kernel=c('rbf'), gamma=c(1e-2, 1e-1, 1, 1e1, 1e2), +#' lambda=c(1e-8, 1e-6), max.iter=c(5000)) +#' grid <- gensvm.grid(x, y, param.grid=pg, verbose=2) +#' gensvm.grid <- function(X, y, param.grid='tiny', refit=TRUE, scoring=NULL, cv=3, verbose=0, return.train.score=TRUE) { |