diff options
| author | Gertjan van den Burg <gertjanvandenburg@gmail.com> | 2018-03-27 13:57:25 +0100 |
|---|---|---|
| committer | Gertjan van den Burg <gertjanvandenburg@gmail.com> | 2018-03-27 13:57:25 +0100 |
| commit | 50b52b707ea3d02a26b42554a424c3983f16aa58 (patch) | |
| tree | 625e0ac415a5e88743255f5b2a5e956f78dc169b /R/plot.gensvm.R | |
| parent | update submodule (diff) | |
| download | rgensvm-50b52b707ea3d02a26b42554a424c3983f16aa58.tar.gz rgensvm-50b52b707ea3d02a26b42554a424c3983f16aa58.zip | |
fix examples after testing them all
Diffstat (limited to 'R/plot.gensvm.R')
| -rw-r--r-- | R/plot.gensvm.R | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/R/plot.gensvm.R b/R/plot.gensvm.R index 0ce215b..85ff3b5 100644 --- a/R/plot.gensvm.R +++ b/R/plot.gensvm.R @@ -46,9 +46,9 @@ #' #' # plot only misclassified samples #' x.mis <- x[predict(fit, x) != y, ] -#' y.mis.true <- y[predict(fit, x) != y, ] -#' plot(fit, x.bad) -#' plot(fit, x.bad, y.true=y.mis.true) +#' y.mis.true <- y[predict(fit, x) != y] +#' plot(fit, x.mis) +#' plot(fit, x.mis, y.true=y.mis.true) #' plot.gensvm <- function(fit, x, y.true=NULL, with.margins=TRUE, with.shading=TRUE, with.legend=TRUE, center.plot=TRUE, |