Class: Rserve::REXP::Double

Inherits:
Vector show all
Defined in:
lib/rserve/rexp/double.rb

Constant Summary collapse

NA_ARRAY = 
[162, 7, 0, 0, 0, 0, 240, 127]

Constants inherited from Rserve::REXP

MaxDebugItems, MismatchError

Instance Attribute Summary collapse

Attributes inherited from Rserve::REXP

#attr

Class Method Summary collapse

Instance Method Summary collapse

Methods inherited from Vector

#==, #to_a, #vector?

Methods inherited from Rserve::REXP

#as_bytes, #as_double, #as_double_matrix, #as_factor, #as_float, #as_floats, #as_integer, #as_list, #as_matrix, #as_nested_array, #as_string, #complex?, create_data_frame, #dim, #environment?, #expression?, #factor?, #get_attribute, #has_attribute?, #inherits?, #language?, #list?, #logical?, #null?, #pair_list?, #raw?, #recursive?, #reference?, #split_array, #string?, #symbol?, #to_f, #to_i, #to_ruby, #vector?

Constructor Details

#initialize(data, attrs = nil) ⇒ Double

Returns a new instance of Double.



18
19
20
21
22
23
24
25
26
27
28
 
# File 'lib/rserve/rexp/double.rb', line 18

def initialize(data, attrs=nil)
  @payload=case data
    when Numeric
      [data.to_f]
    when Array
      data
    else
      raise ArgumentError, "Should be Numeric or Array"
  end
  super(attrs)
end

Instance Attribute Details

#payload ⇒ Object (readonly)

Returns the value of attribute payload.



5
6
7
 
# File 'lib/rserve/rexp/double.rb', line 5

def payload
  @payload
end

Class Method Details

.infinite?(value) ⇒ Boolean

Returns:



63
64
65
 
# File 'lib/rserve/rexp/double.rb', line 63

def self.infinite?(value)
  value.respond_to?(:infinite?) and !value.infinite?.nil?
end

Instance Method Details

#as_doubles ⇒ Object 



43
44
45
46
47
 
# File 'lib/rserve/rexp/double.rb', line 43

def as_doubles
  @payload.map do |v|
    na?(v) ? nil : v.to_f
  end
end

#as_integers ⇒ Object 



38
39
40
41
42
 
# File 'lib/rserve/rexp/double.rb', line 38

def as_integers
  @payload.map do |v|
    (na?(v) or Double.infinite?(v)) ? nil : v.to_i
  end
end

#as_strings ⇒ Object 



48
49
50
 
# File 'lib/rserve/rexp/double.rb', line 48

def as_strings
  @payload.map {|v| v.to_f.to_s}
end

#integer? ⇒ Boolean

Returns:



32
33
34
 
# File 'lib/rserve/rexp/double.rb', line 32

def integer?
  true
end

#length ⇒ Object 



29
30
31
 
# File 'lib/rserve/rexp/double.rb', line 29

def length
  payload.length
end

#na?(value = :nil) ⇒ Boolean

Returns:



52
53
54
55
56
57
58
59
60
61
 
# File 'lib/rserve/rexp/double.rb', line 52

def na?(value=:nil)
  #if value.nil?
  #  @payload.map {|v| v.respond_to? :nan and v.nan?}
  #else  
  #  value.respond_to? :nan? and value.nan?
  #end
  #p @payload
  return _na?(value) unless value==:nil
  @payload.map {|v| _na?(v) }
end

#numeric? ⇒ Boolean

Returns:



35
36
37
 
# File 'lib/rserve/rexp/double.rb', line 35

def numeric?
  true
end

#to_debug_string ⇒ Object 



68
69
70
71
 
# File 'lib/rserve/rexp/double.rb', line 68

def to_debug_string
  t=super
  t << "{"  << @payload.map(&:to_s).join(",") << "}"
end

#to_ruby_internal ⇒ Object 



72
73
74
75
76
77
78
79
80
81
82
 
# File 'lib/rserve/rexp/double.rb', line 72

def to_ruby_internal
  if dim 
    if dim.size==2
      as_matrix
    else
      as_nested_array
    end
  else
    super
  end
end