Mathematica 嵌套函数的 Ruby 方程？

Question

这是 Mathematica 的 Nest 函数定义。等式是什么？在鲁比？

想法是这样的：

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未指定），那么你可以返回一个lambda：

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

并像这样使用它：

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

或者你可以重新排列>嵌套参数并使用 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

我不懂 Ruby，但我查看了该语言的描述并编写了以下代码。

让它成为您的函数

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 并得到了相同的答案。