Module: Enumerable

Defined in:
lib/active_object/enumerable.rb

Instance Method Summary collapse

Instance Method Details

#cluster(&block) ⇒ Object

rubocop:disable Lint/UnusedMethodArgument



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

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



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

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 



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

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 



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

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 



95
96
97
98
99
 
# File 'lib/active_object/enumerable.rb', line 95

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 



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

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) 


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

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) 


122
123
124
 
# File 'lib/active_object/enumerable.rb', line 122

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

#expand ⇒ Object 



126
127
128
 
# File 'lib/active_object/enumerable.rb', line 126

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

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



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

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

#incase?(object) ⇒ Boolean

rubocop:disable Style/CaseEquality

Returns:

  • (Boolean) 


139
140
141
 
# File 'lib/active_object/enumerable.rb', line 139

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

#interpose(sep, &block) ⇒ Object

rubocop:disable Metrics/MethodLength



145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
 
# File 'lib/active_object/enumerable.rb', line 145

def interpose(sep, &block)
  enum = Enumerator.new do |val|
    items = each

    loop do
      begin
        val << items.next
      rescue StopIteration
        break
      end

      begin
        items.peek
      rescue StopIteration
        break
      else
        val << sep
      end
    end
  end

  block ? enum.each(&block) : enum
end

#many? ⇒ Boolean

rubocop:enable Metrics/MethodLength

Returns:

  • (Boolean) 


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

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 



182
183
184
185
186
187
 
# File 'lib/active_object/enumerable.rb', line 182

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

  collection_length = length
  sum.to_f / collection_length.to_f
end

#median(identity = 0) ⇒ Object 



191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
 
# File 'lib/active_object/enumerable.rb', line 191

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



208
209
210
211
212
213
214
215
216
217
 
# File 'lib/active_object/enumerable.rb', line 208

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:enable Metrics/AbcSize



220
221
222
223
224
225
226
 
# File 'lib/active_object/enumerable.rb', line 220

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

#occurrences ⇒ Object 



228
229
230
 
# File 'lib/active_object/enumerable.rb', line 228

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

#percentile(num, identity = 0) ⇒ Object

rubocop:disable Metrics/AbcSize, Metrics/MethodLength



233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
 
# File 'lib/active_object/enumerable.rb', line 233

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/AbcSize, Metrics/MethodLength



251
252
253
254
255
256
 
# File 'lib/active_object/enumerable.rb', line 251

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

  collection_sorted = sort
  collection_sorted.last - collection_sorted.first
end

#reject_outliers ⇒ Object 



258
259
260
261
 
# File 'lib/active_object/enumerable.rb', line 258

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

#reject_outliers! ⇒ Object 



263
264
265
 
# File 'lib/active_object/enumerable.rb', line 263

def reject_outliers!
  replace(reject_outliers)
end

#select_outliers ⇒ Object 



267
268
269
270
 
# File 'lib/active_object/enumerable.rb', line 267

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

#several? ⇒ Boolean

Returns:

  • (Boolean) 


272
273
274
275
276
277
278
279
280
 
# File 'lib/active_object/enumerable.rb', line 272

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
end

#standard_deviation(identity = 0) ⇒ Object 



282
283
284
285
286
 
# File 'lib/active_object/enumerable.rb', line 282

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

  ::Math.sqrt(variance)
end

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



288
289
290
291
292
293
294
 
# File 'lib/active_object/enumerable.rb', line 288

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 



296
297
298
299
300
301
302
 
# File 'lib/active_object/enumerable.rb', line 296

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 



304
305
306
307
308
309
310
 
# File 'lib/active_object/enumerable.rb', line 304

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 



312
313
314
315
316
317
318
319
 
# File 'lib/active_object/enumerable.rb', line 312

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 



321
322
323
324
325
326
 
# File 'lib/active_object/enumerable.rb', line 321

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

  (mean - value).abs / sd
end