From b7a63527991cce68daa984f36088f23cf7d1a199 Mon Sep 17 00:00:00 2001
From: Gertjan van den Burg <gertjanvandenburg@gmail.com>
Date: Tue, 3 Apr 2018 19:41:35 -0400
Subject: fix for weights in refit

---
 R/gensvm.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'R/gensvm.R')

diff --git a/R/gensvm.R b/R/gensvm.R
index 5652a4c..d59c7e0 100644
--- a/R/gensvm.R
+++ b/R/gensvm.R
@@ -169,7 +169,7 @@ gensvm <- function(x, y, p=1.0, lambda=1e-8, kappa=0.0, epsilon=1e-6,
                   lambda,
                   kappa,
                   epsilon,
-                  weight.idx,
+                  as.integer(weight.idx),
                   raw.weights,
                   as.integer(kernel.idx),
                   gamma,
-- 
cgit v1.2.3