Wolfram mathematica 用变量（p）表示的递归实解

我想要

u[m，n]

在

p

方面；不要只在

p

方面回答

u[0,2]=2u[1,0]/p

；就像我想要

u[m，n]

的值来表示

m

和

n

的不同值，正如Jonie Shih所说，你的递归不会终止。您可能希望为小于1的任一参数终止：

u[0, 0] =1
u[m, n] =(1/(p + m + m^2)) (m*u[(m - 1), n] + n*u[(m + 1), (n - 2)] + m*(m - 1)*u[(m - 2), (n + 2)])

---

是哪一个？Matlab还是Mathematica？如果第二行代码打算作为函数定义，那么它就有严重缺陷。阅读基本函数定义的文档，找出参数匹配的模式，研究

SetDelayed

u[0,0]=1是初始条件；我想要u[m，n]的算法，函数是对的，这并没有问题，你们能帮我找到算法吗？让m=1，n=1。然后该函数用于u[（m-2），（n+2）]，即u[-1,3]。然后，它将无限地获取u[-3，5]等等。功能有缺陷。高性能标记意味着函数声明的语法有缺陷。使用

u[m，n]：=

u[x_, y_] /; x < 1 || y < 1 = 1;

u[m_, n_] :=
 (1/(p + m + m^2)) (m*u[(m - 1), n] + n*u[(m + 1), (n - 2)] + 
    m*(m - 1)*u[(m - 2), (n + 2)])

p = 4;
u[3, 5]

593037/1392640