diff options
| author | Gertjan van den Burg <gertjanvandenburg@gmail.com> | 2018-03-28 13:42:39 +0100 |
|---|---|---|
| committer | Gertjan van den Burg <gertjanvandenburg@gmail.com> | 2018-03-28 13:42:39 +0100 |
| commit | 515ad24e46680fe2dfdc3418d531101c5ab9a688 (patch) | |
| tree | e811aac6a094ee74e2a4b6fab0190e85885b8734 /man | |
| parent | Properly handle factors for string parameters in gridsearch (diff) | |
| download | rgensvm-515ad24e46680fe2dfdc3418d531101c5ab9a688.tar.gz rgensvm-515ad24e46680fe2dfdc3418d531101c5ab9a688.zip | |
Add example for nonlinear classification
Diffstat (limited to 'man')
| -rw-r--r-- | man/gensvm.grid.Rd | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/man/gensvm.grid.Rd b/man/gensvm.grid.Rd index 9fdee96..cc44286 100644 --- a/man/gensvm.grid.Rd +++ b/man/gensvm.grid.Rd @@ -144,6 +144,11 @@ print(grid) 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) + } \author{ Gerrit J.J. van den Burg, Patrick J.F. Groenen \cr |