Ruby的Eqv for Mathematica的Nest函數？

Question

Here's Mathematica's Nest function Definition。什麼是eqv。在Ruby中？

的想法是這樣的：

nest(f, x, 3) #=> f(f(f(x))) 

Answer 1

你可以定義自己的使用inject：

def nest(f, x, n) 
    n.times.inject(x) { |m| f.call(m) } 
end 

然後，你可以這樣調用它：

>> def f(x) 2*x end 
>> nest(method(:f), 1, 3) 
=> 8 

如果你想要一個函數返回（即離開x不詳），那麼你可以返回拉姆達：

def nestx(f, n) 
    ->(x) { n.times.inject(x) { |m| f.call(m) } } 
end 

並且像這樣使用它：

>> nestx(method(:f), 3).call(1) 
=> 8 

或者你可以重新排列nest參數和使用Proc#curry：

def nest(f, n, x) 
    n.times.inject(x) { |m| f.call(m) } 
end 

>> method(:nest).to_proc.curry.call(method(:f), 3).call(1) 
=> 8 

您還可以使用[]代替call如果想要的東西，看起來更像是一個函數調用：

def nest(f, n, x) 
    n.times.inject(x) { |m| f[m] } 
end 

>> method(:nest).to_proc.curry[method(:f), 3][1] 
=> 8 

Answer 2

我不知道紅寶石，但我看着語言的描述，並寫了下面的代碼..

讓它成爲你的函數

def func(­x) 
    return sin(x­) 
end 

和讓限定巢功能

def nest(­f, x, n) 
    count = 0 
    while count­<n 
     x = send(f, x) 
     count += 1 
    end 
    return x 
end 

稱其爲nest(:func­, 1, 3)和結果將是0.67843047736074

我與http://www.wolframalpha.com結果進行比較，並得到了同樣的答案。