Haskellのscanlに相当するRubyとは何ですか？

Question

This questionは、HaskellのscanlのバージョンをPythonで提供しますが、この関数のRubyバージョンはありますか？おそらく、よりよいバージョンを書くことができ

Answer 1

が、これは私が思い付いたものです：

require 'spec_helper' 

class Array 
    def scanl accumulator, &block 
    results = [accumulator] + self 
    results.each_with_index do |e, i| 
     results[i] = block.call(accumulator, e) 
     accumulator = results[i] 
    end 
    results 
    end 
end 

describe "#scanl" do 
    it 'is similar to foldl, but returns a list of successive reduced values from the left' do 
    # example from http://learnyouahaskell.com/higher-order-functions 
    expect([3, 5, 2, 1].scanl(0, &:+)).to eq([0,3,8,10,11]) 
    end 
end 

私はもっとreduceようになり代わりにブロックの:+のように、単にメソッド名を取るためにscanlを変更すると考えました。思考？

Answer 2

reduce()を使用して、自分で実装することができます。

def scanl(op, init, range) 
    op = op.to_proc unless op.is_a?(Proc) 
    range.reduce([init]) { |a, e| a.push(op.call(a.last,e)) } 
end 

p scanl(lambda { |a, b| a + b }, 0, 1..10) 
#=> [0, 1, 3, 6, 10, 15, 21, 28, 36, 45, 55] 
p scanl(:+, 0, 1..10) 
#=> [0, 1, 3, 6, 10, 15, 21, 28, 36, 45, 55] 

また、map()を使用して、配列の先頭に初期要素を配置することもできます。

def scanl(op, init, range)        
    op = op.to_proc unless op.is_a?(Proc)     
    acc = init           
    range.map { |e| acc = op.call(acc, e) }.unshift(init) 
end