aboutsummaryrefslogtreecommitdiff
path: root/R/gensvm.R
diff options
context:
space:
mode:
Diffstat (limited to 'R/gensvm.R')
-rw-r--r--R/gensvm.R3
1 files changed, 2 insertions, 1 deletions
diff --git a/R/gensvm.R b/R/gensvm.R
index cc30b4b..b70be78 100644
--- a/R/gensvm.R
+++ b/R/gensvm.R
@@ -182,7 +182,8 @@ gensvm <- function(X, y, p=1.0, lambda=1e-8, kappa=0.0, epsilon=1e-6,
classes = classes, V = out$V, n.iter = out$n.iter,
n.support = out$n.support,
training.time = out$training.time,
- X.train = if(kernel == 'linear') NULL else X)
+ X.train = if(kernel == 'linear') NULL else X,
+ feature.names = colnames(X))
class(object) <- "gensvm"
return(object)