Mathematica 可以使用 RSolve 求解递归方程。是否有可能有一个由递归定义的函数,而不管递归是否可以解析解决?
最佳答案
是的。看RecurrenceTable
.还可以通过其递推方程来编程定义一个函数,阶乘是最简单的例子。
In[94]:= fac[1] = 1;
fac[k_Integer?Positive] := k*fac[k - 1]
In[96]:= fac[10]
Out[96]= 3628800
In[97]:= Function[If[#1 == 1, 1, #1*#0[#1 - 1]]][10]
Out[97]= 3628800
In[100]:= RecurrenceTable[
f[k] == k f[k - 1] && f[1] == 1, f, {k, 1, 10}]
Out[100]= {1, 2, 6, 24, 120, 720, 5040, 40320, 362880, 3628800}
关于wolfram-mathematica - Mathematica 中的递归函数定义,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/5702431/