Class: Chartnado::Series::Wrap

Inherits:
SimpleDelegator
  • Object
show all
Defined in:
lib/chartnado/series/wrap.rb

Class Method Summary collapse

Instance Method Summary collapse

Class Method Details

.[](series) ⇒ Object 



4
5
6
 
# File 'lib/chartnado/series/wrap.rb', line 4

def self.[](series)
  series.class == self ? series : new(series)
end

Instance Method Details

#*(val) ⇒ Object 



8
9
10
 
# File 'lib/chartnado/series/wrap.rb', line 8

def *(val)
  times(val, precision: nil)
end

#add(*series, scalar_sum: 0.0) ⇒ Object 



45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
 
# File 'lib/chartnado/series/wrap.rb', line 45

def add(*series, scalar_sum: 0.0)
  (series, scalars) = [__getobj__, *series].partition { |s| s.respond_to?(:map) }
  scalar_sum += scalars.reduce(:+) || 0.0
  return wrap(scalar_sum) unless series.present?

  if wrap(series.first).has_separate_named_series?
    result = series.map(&:to_a).flatten(1).group_by(&:first).map do |name, values|
      data = values.map(&:second).reduce(Hash.new(scalar_sum)) do |hash, values|
        values.each do |key, value|
          hash[key] += value
        end
        hash
      end
      [
        name, data
      ]
    end
  elsif series.first.is_a?(Hash)
    keys = series.flat_map(&:keys).uniq
    result = keys.reduce({}) do |hash, key|
      hash[key] = (series.map { |s| s[key] }.compact.reduce(:+) || 0) + scalar_sum
      hash
    end
  elsif series.first.is_a?(Array)
    result = series.map { |s| s.reduce(:+) + scalar_sum }
  else
    result = scalar_sum
  end

  wrap(result)
end

#array? ⇒ Boolean

Returns:

  • (Boolean) 


135
136
137
 
# File 'lib/chartnado/series/wrap.rb', line 135

def array?
  __getobj__.is_a?(Array)
end

#array_of_named_series? ⇒ Boolean

Returns:

  • (Boolean) 


139
140
141
 
# File 'lib/chartnado/series/wrap.rb', line 139

def array_of_named_series?
  array? && first.second.is_a?(Hash)
end

#dimensions ⇒ Object 



147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
 
# File 'lib/chartnado/series/wrap.rb', line 147

def dimensions
  return 1 unless respond_to?(:length)
  if hash?
    if keys.first && keys.first.is_a?(Array) || hash_of_named_series?
      3
    else
      2
    end
  else
    if first && first.is_a?(Array)
      3
    else
      2
    end
  end
end

#has_multiple_series? ⇒ Boolean

Returns:

  • (Boolean) 


124
125
126
127
128
129
 
# File 'lib/chartnado/series/wrap.rb', line 124

def has_multiple_series?
  array_of_named_series? || is_a?(Hash) && begin
    first_series = series.first
    first_series[0].is_a?(Array) && first_series[0].length > 1 || first_series[1].respond_to?(:length)
  end
end

#has_separate_named_series? ⇒ Boolean

Returns:

  • (Boolean) 


164
165
166
 
# File 'lib/chartnado/series/wrap.rb', line 164

def has_separate_named_series?
  hash_of_named_series? || array_of_named_series?
end

#hash? ⇒ Boolean

Returns:

  • (Boolean) 


131
132
133
 
# File 'lib/chartnado/series/wrap.rb', line 131

def hash?
  __getobj__.is_a?(Hash)
end

#hash_of_named_series? ⇒ Boolean

Returns:

  • (Boolean) 


143
144
145
 
# File 'lib/chartnado/series/wrap.rb', line 143

def hash_of_named_series?
  hash? && values.first && values.first.is_a?(Hash)
end

#over(bottom, multiplier: 1.0, precision: 2) ⇒ Object 



77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
 
# File 'lib/chartnado/series/wrap.rb', line 77

def over(bottom, multiplier: 1.0, precision: 2)
  bottom = wrap(bottom)
  return times(1.0 * multiplier / bottom, precision: precision) if bottom.dimensions == 1

  if dimensions > bottom.dimensions
    top_series_by_name = data_by_name
    if has_separate_named_series?
      data_by_name.map do |name, top_values|
        [
          name,
          wrap(top_values).
            over(bottom, multiplier: multiplier, precision: precision)
        ]
      end
    else
      bottom.reduce({}) do |hash, (key, value)|
        top_series_by_name.keys.each do |name|
          top_key = [name, *Array.wrap(key)]
          top_value = top_series_by_name[name][top_key]
          if top_value
            hash[top_key] = wrap(top_value).
              over(value, multiplier: multiplier, precision: precision)
          end
        end
        hash
      end
    end
  elsif array_of_named_series?
    top_series_by_name = data_by_name
    bottom.map do |(name, data)|
      [
        name,
        wrap(top_series_by_name[name]).
          over(data, multiplier: multiplier, precision: precision)
      ]
    end
  elsif bottom.respond_to?(:reduce)
    bottom.reduce({}) do |hash, (key, value)|
      hash[key] = wrap(self[key] || 0).
        over(value, multiplier: multiplier, precision: precision)
      hash
    end
  else
    with_precision(precision, to_f * multiplier.to_f / bottom.to_f)
  end
end

#times(factor, precision: 2) ⇒ Object 



12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
 
# File 'lib/chartnado/series/wrap.rb', line 12

def times(factor, precision: 2)
  factor = wrap(factor)

  return factor.times(self, precision: precision) if factor.dimensions > dimensions
  return with_precision(precision, factor.to_f * to_f) unless dimensions > 1
  return self unless length > 0

  if has_separate_named_series? || array? && first.is_a?(Array)
    result = map { |(name, data)| [name, wrap(data) * factor] }
  elsif hash?
    result = to_a.reduce({}) do |hash, (key, value)|
      if factor.hash?
        if key.is_a?(Array)
          scalar = factor[key.second]
        else
          scalar = factor[key]
        end
      else
        scalar = factor
      end
      scalar ||= 0
      hash[key] = scalar * value
      hash
    end
  else
    result = map do |value|
      factor * value
    end
  end

  wrap(result)
end