Module: Enumerable

Defined in:
lib/active_object/enumerable.rb

Instance Method Summary collapse

Instance Method Details

#cluster(&block) ⇒ Object

rubocop:disable Lint/UnusedMethodArgument



55
56
57
58
59
60
61
62
 
# File 'lib/active_object/enumerable.rb', line 55

def cluster(&block)
  result = []
  each do |ele|
    last_res = result.last
    last_res && (yield(ele) == yield(last_res.last)) ? last_res << ele : result << [ele]
  end
  result
end

#critical_zscore(identity = nil) ⇒ Object

rubocop:enable Lint/UnusedMethodArgument



65
66
67
68
69
70
71
72
73
74
75
 
# File 'lib/active_object/enumerable.rb', line 65

def critical_zscore(identity = nil)
  collection_length = length
  result = nil

  CRITICAL_ZSCORE.keys.sort.each do |key|
    break if key > collection_length
    result = CRITICAL_ZSCORE[key]
  end

  result || identity
end

#difference(identity = 0, &block) ⇒ Object 



77
78
79
80
81
82
83
 
# File 'lib/active_object/enumerable.rb', line 77

def difference(identity = 0, &block)
  if block_given?
    map(&block).difference(identity)
  else
    inject { |key, val| key - val } || identity
  end
end

#divisible(identity = 0, &block) ⇒ Object 



85
86
87
88
89
90
91
 
# File 'lib/active_object/enumerable.rb', line 85

def divisible(identity = 0, &block)
  if block_given?
    map(&block).divisible(identity)
  else
    inject { |key, val| key / val } || identity
  end
end

#drop_last(num) ⇒ Object 



93
94
95
96
97
 
# File 'lib/active_object/enumerable.rb', line 93

def drop_last(num)
  collection_length = to_a.length
  return self if num > collection_length
  self[0...(collection_length - num)]
end

#drop_last_if ⇒ Object 



99
100
101
102
103
104
105
106
107
108
 
# File 'lib/active_object/enumerable.rb', line 99

def drop_last_if
  return(to_enum(:drop_last_if)) unless block_given?

  result = []
  dropping = true
  reverse_each do |val|
    result.unshift(val) unless dropping &&= yield(val)
  end
  result
end

#exactly?(num) ⇒ Boolean

Returns:

  • (Boolean) 


110
111
112
113
114
115
116
117
118
 
# File 'lib/active_object/enumerable.rb', line 110

def exactly?(num)
  found_count = 0
  if block_given?
    each { |*opt| found_count += 1 if yield(*opt) }
  else
    each { |opt| found_count += 1 if opt }
  end
  found_count > num ? false : num == found_count
end

#exclude?(object) ⇒ Boolean

Returns:

  • (Boolean) 


120
121
122
 
# File 'lib/active_object/enumerable.rb', line 120

def exclude?(object)
  !include?(object)
end

#expand ⇒ Object 



124
125
126
 
# File 'lib/active_object/enumerable.rb', line 124

def expand
  map { |val| val.is_a?(Enumerable) ? val.expand : val }
end

#exponential(identity = 0, &block) ⇒ Object 



128
129
130
131
132
133
134
 
# File 'lib/active_object/enumerable.rb', line 128

def exponential(identity = 0, &block)
  if block_given?
    map(&block).exponential(identity)
  else
    inject { |key, val| key**val } || identity
  end
end

#frequencies ⇒ Object 



136
137
138
 
# File 'lib/active_object/enumerable.rb', line 136

def frequencies
  each_with_object(Hash.new(0)) { |key, hsh| hsh[key] += 1 }
end

#incase?(object) ⇒ Boolean

rubocop:disable Style/CaseEquality

Returns:

  • (Boolean) 


141
142
143
 
# File 'lib/active_object/enumerable.rb', line 141

def incase?(object)
  any? { |val| object === val }
end

#many? ⇒ Boolean

rubocop:enable Style/CaseEquality

Returns:

  • (Boolean) 


146
147
148
149
150
151
152
153
154
155
156
 
# File 'lib/active_object/enumerable.rb', line 146

def many?
  found_count = 0
  if block_given?
    any? do |val|
      found_count += 1 if yield val
      found_count > 1
    end
  else
    any? { (found_count += 1) > 1 }
  end
end

#mean(identity = 0) ⇒ Object Also known as: average 



158
159
160
161
162
163
 
# File 'lib/active_object/enumerable.rb', line 158

def mean(identity = 0)
  return identity if empty?

  collection_length = length
  sum.to_f / collection_length.to_f
end

#median(identity = 0) ⇒ Object 



167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
 
# File 'lib/active_object/enumerable.rb', line 167

def median(identity = 0)
  collection_length = length.to_f
  collection_sorted = sort

  return(identity) unless collection_length > 0.0

  half_collection = collection_length / 2.0
  sorted_collection = collection_sorted[half_collection]

  if (collection_length % 2).zero?
    (collection_sorted[half_collection - 1.0] + sorted_collection) / 2.0
  else
    sorted_collection
  end
end

#mode(identity = 0) ⇒ Object

rubocop:disable Metrics/AbcSize



184
185
186
187
188
189
190
191
192
193
 
# File 'lib/active_object/enumerable.rb', line 184

def mode(identity = 0)
  return identity unless length.positive?

  frequency_distribution = each_with_object(Hash.new(0)) { |val, hsh| hsh[val] += 1 }
  frequency_top_two = frequency_distribution.sort_by { |_, val| -val }.take(2)
  top_two_first = frequency_top_two.first

  return if frequency_top_two.length != 1 && top_two_first.last == frequency_top_two.last.last
  top_two_first.first
end

#multiple(identity = 0, &block) ⇒ Object

rubocop:ensable Metrics/AbcSize



196
197
198
199
200
201
202
 
# File 'lib/active_object/enumerable.rb', line 196

def multiple(identity = 0, &block)
  if block_given?
    map(&block).multiple(identity)
  else
    inject { |key, val| key * val } || identity
  end
end

#percentile(num, identity = 0) ⇒ Object

rubocop:disable Metrics/MethodLength



205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
 
# File 'lib/active_object/enumerable.rb', line 205

def percentile(num, identity = 0)
  return identity unless length.positive?

  collection_sorted = sort
  rank = (num.to_f / 100) * (length + 1)

  if rank.fraction?
    truncated_rank = rank.truncate
    sample_one = collection_sorted[truncated_rank - 1]
    sample_two = collection_sorted[truncated_rank]

    (rank.fraction * (sample_two - sample_one)) + sample_one
  else
    collection_sorted[rank - 1]
  end
end

#range(identity = 0) ⇒ Object

rubocop:enable Metrics/MethodLength



223
224
225
226
227
228
 
# File 'lib/active_object/enumerable.rb', line 223

def range(identity = 0)
  return identity unless length.positive?

  collection_sorted = sort
  collection_sorted.last - collection_sorted.first
end

#reject_outliers ⇒ Object 



230
231
232
233
 
# File 'lib/active_object/enumerable.rb', line 230

def reject_outliers
  cz = critical_zscore
  reject { |value| zscore(value) > cz }
end

#reject_outliers! ⇒ Object 



235
236
237
 
# File 'lib/active_object/enumerable.rb', line 235

def reject_outliers!
  replace(reject_outliers)
end

#select_outliers ⇒ Object 



239
240
241
242
 
# File 'lib/active_object/enumerable.rb', line 239

def select_outliers
  cz = critical_zscore
  select { |value| zscore(value) > cz }
end

#several? ⇒ Boolean

Returns:

  • (Boolean) 


244
245
246
247
248
249
250
251
252
 
# File 'lib/active_object/enumerable.rb', line 244

def several?
  found_count = 0
  if block_given?
    each { |*opt| found_count += 1 if yield(*opt) }
  else
    each { |opt| found_count += 1 if opt }
  end
  found_count > 1 ? true : false
end

#standard_deviation(identity = 0) ⇒ Object 



254
255
256
257
258
 
# File 'lib/active_object/enumerable.rb', line 254

def standard_deviation(identity = 0)
  return identity if length < 2

  Math.sqrt(variance)
end

#sum(identity = 0, &block) ⇒ Object 



260
261
262
263
264
265
266
 
# File 'lib/active_object/enumerable.rb', line 260

def sum(identity = 0, &block)
  if block_given?
    map(&block).sum(identity)
  else
    inject { |sum, val| sum + val } || identity
  end
end

#take_last(num) ⇒ Object 



268
269
270
271
272
273
274
 
# File 'lib/active_object/enumerable.rb', line 268

def take_last(num)
  collection_length = to_a.length

  return self if num > collection_length

  self[(collection_length - num)..-1]
end

#take_last_if ⇒ Object 



276
277
278
279
280
281
282
 
# File 'lib/active_object/enumerable.rb', line 276

def take_last_if
  return(to_enum(:take_last_if)) unless block_given?

  result = []
  reverse_each { |val| yield(val) ? result.unshift(val) : break }
  result
end

#variance(identity = 0) ⇒ Object 



284
285
286
287
288
289
290
291
 
# File 'lib/active_object/enumerable.rb', line 284

def variance(identity = 0)
  collection_length = length

  return identity if collection_length <= 1

  total = inject(0.0) { |sum, val| sum + (val - mean)**2.0 }
  total.to_f / (collection_length.to_f - 1.0)
end

#zscore(value) ⇒ Object 



293
294
295
296
297
298
 
# File 'lib/active_object/enumerable.rb', line 293

def zscore(value)
  sd = standard_deviation
  return 0 if sd.zero?

  (mean - value).abs / sd
end