lib/svmkit/linear_model/svr.rb in svmkit-0.6.0 vs lib/svmkit/linear_model/svr.rb in svmkit-0.6.1

@@ -1,11 +1,10 @@
 # frozen_string_literal: true
 
 require 'svmkit/validation'
-require 'svmkit/base/base_estimator'
+require 'svmkit/linear_model/sgd_linear_estimator'
 require 'svmkit/base/regressor'
-require 'svmkit/optimizer/nadam'
 
 module SVMKit
   module LinearModel
     # SVR is a class that implements Support Vector Regressor
     # with mini-batch stochastic gradient descent optimization.
@@ -16,12 +15,11 @@
     #   estimator.fit(training_samples, traininig_target_values)
     #   results = estimator.predict(testing_samples)
     #
     # *Reference*
     # 1. S. Shalev-Shwartz and Y. Singer, "Pegasos: Primal Estimated sub-GrAdient SOlver for SVM," Proc. ICML'07, pp. 807--814, 2007.
-    class SVR
-      include Base::BaseEstimator
+    class SVR < SGDLinearEstimator
       include Base::Regressor
       include Validation
 
       # Return the weight vector for SVR.
       # @return [Numo::DFloat] (shape: [n_outputs, n_features])
@@ -52,24 +50,13 @@
         check_params_integer(max_iter: max_iter, batch_size: batch_size)
         check_params_boolean(fit_bias: fit_bias)
         check_params_type_or_nil(Integer, random_seed: random_seed)
         check_params_positive(reg_param: reg_param, bias_scale: bias_scale, epsilon: epsilon,
                               max_iter: max_iter, batch_size: batch_size)
-        @params = {}
-        @params[:reg_param] = reg_param
-        @params[:fit_bias] = fit_bias
-        @params[:bias_scale] = bias_scale
+        super(reg_param: reg_param, fit_bias: fit_bias, bias_scale: bias_scale,
+              max_iter: max_iter, batch_size: batch_size, optimizer: optimizer, random_seed: random_seed)
         @params[:epsilon] = epsilon
-        @params[:max_iter] = max_iter
-        @params[:batch_size] = batch_size
-        @params[:optimizer] = optimizer
-        @params[:optimizer] ||= Optimizer::Nadam.new
-        @params[:random_seed] = random_seed
-        @params[:random_seed] ||= srand
-        @weight_vec = nil
-        @bias_term = nil
-        @rng = Random.new(@params[:random_seed])
       end
 
       # Fit the model with given training data.
       #
       # @param x [Numo::DFloat] (shape: [n_samples, n_features]) The training data to be used for fitting the model.
@@ -79,18 +66,18 @@
         check_sample_array(x)
         check_tvalue_array(y)
         check_sample_tvalue_size(x, y)
 
         n_outputs = y.shape[1].nil? ? 1 : y.shape[1]
-        _n_samples, n_features = x.shape
+        n_features = x.shape[1]
 
         if n_outputs > 1
           @weight_vec = Numo::DFloat.zeros(n_outputs, n_features)
           @bias_term = Numo::DFloat.zeros(n_outputs)
-          n_outputs.times { |n| @weight_vec[n, true], @bias_term[n] = single_fit(x, y[true, n]) }
+          n_outputs.times { |n| @weight_vec[n, true], @bias_term[n] = partial_fit(x, y[true, n]) }
         else
-          @weight_vec, @bias_term = single_fit(x, y)
+          @weight_vec, @bias_term = partial_fit(x, y)
         end
 
         self
       end
 
@@ -122,51 +109,15 @@
         nil
       end
 
       private
 
-      def single_fit(x, y)
-        # Expand feature vectors for bias term.
-        samples = @params[:fit_bias] ? expand_feature(x) : x
-        # Initialize some variables.
-        n_samples, n_features = samples.shape
-        rand_ids = [*0...n_samples].shuffle(random: @rng)
-        weight_vec = Numo::DFloat.zeros(n_features)
-        optimizer = @params[:optimizer].dup
-        # Start optimization.
-        @params[:max_iter].times do |_t|
-          # random sampling
-          subset_ids = rand_ids.shift(@params[:batch_size])
-          rand_ids.concat(subset_ids)
-          data = samples[subset_ids, true]
-          values = y[subset_ids]
-          # update the weight vector.
-          loss_grad = loss_gradient(data, values, weight_vec)
-          weight_vec = optimizer.call(weight_vec, weight_gradient(loss_grad, data, weight_vec))
-        end
-        split_weight_vec_bias(weight_vec)
-      end
-
-      def loss_gradient(x, y, weight)
+      def calc_loss_gradient(x, y, weight)
         z = x.dot(weight)
         grad = Numo::DFloat.zeros(@params[:batch_size])
         grad[(z - y).gt(@params[:epsilon]).where] = 1
         grad[(y - z).gt(@params[:epsilon]).where] = -1
         grad
-      end
-
-      def weight_gradient(loss_grad, x, weight)
-        x.transpose.dot(loss_grad) / @params[:batch_size] + @params[:reg_param] * weight
-      end
-
-      def expand_feature(x)
-        Numo::NArray.hstack([x, Numo::DFloat.ones([x.shape[0], 1]) * @params[:bias_scale]])
-      end
-
-      def split_weight_vec_bias(weight_vec)
-        weights = @params[:fit_bias] ? weight_vec[0...-1] : weight_vec
-        bias = @params[:fit_bias] ? weight_vec[-1] : 0.0
-        [weights, bias]
       end
     end
   end
 end