Module: RType::CoreExt::NumericDelegateR

Extended by:
Helper::RObjDelegatable::ClassMethods
Included in:
Helper::RObjDelegatable
Defined in:
lib/r_type/core_ext/numeric_delegate_r.rb

Instance Method Summary collapse

Methods included from Helper::RObjDelegatable::ClassMethods

delegate_constructor, delegate_to_R

Instance Method Details

#*(val) ⇒ Object 



7
8
9
10
11
12
13
14
15
16
17
18
 
# File 'lib/r_type/core_ext/numeric_delegate_r.rb', line 7

def * val
  if is_robj_matrix?(val)
    if val.respond_to?(:is_robj_matrix_multiply?) && val.is_robj_matrix_multiply? &&
        self.respond_to?(:is_robj_matrix_multiply?) && self.is_robj_matrix_multiply?
      R['%*%'].call(self, val)
    else
      R[:*].call(self, val)
    end
  else
    super
  end
end