Próbuję rozwiązać (znaleźć rozwiązanie zamkniętej formy) tę Kalkulator ryzyka (OR) równanie rekurencyjne:Rozwiąż powtarzalność formy p [n, m] == p [n, m-2] + p [n-1, m-1] + p [n-2, m]
p[n,m] == 2890/7776*p[n,m-2] + 2611/7776*p[n-1,m-1] + 2275/7776*p[n-2,m],
p[n,1] == 855/1296 + 441/1296*p[n-1,1],
p[3,m] == 295/1296*p[3,m-2] + 420/1296*p[2,m-1],
p[2,m] == 55/216,
p[1,m] == 0
funkcja RSolve Mathematica nie działa (jestem pewien, że używam właściwą składnię z , ponieważ Obserwuję dwa zmienne przykłady pod adresem http://reference.wolfram.com/mathematica/ref/RSolve.html).
W rzeczywistości RSolve nie będzie nawet rozwiązać ten „prostszy” rekursji:
p[n,m] == p[n,m-2] + p[n-1,m-1] + p[n-2,m],
p[0,m] == 1,
p[1,m] == 1,
p[n,1] == 1,
p[n,0] == 1
jest coś fundamentalnie trudno o rozwiązywaniu tego typu równanie rekurencyjne lub jest Mathematica prostu łuszcząca?
Dokładna przykład używam:
RSolve[{
p[n,m] == p[n,m-2] + p[n-1,m-1] + p[n-2,m],
p[0,m] == 1,
p[1,m] == 1,
p[n,1] == 1,
p[n,0] == 1
}, p[n,m], {n,m}]
Zwracana wartość jest taka sama jak mojego wejścia, aż do pewnego numeru żonglerki.
Na stronie doc, to pod „Zakres”, a następnie „równań różnicę”
@ user354134 Czy możesz opublikować swoją składnię i dokładne przykłady, które obserwujesz? Nie znajduję odpowiednich problemów w pomocy Mathematica - Tnx! BTW ... tnx do tych, którzy ponownie otworzyli to pytanie! –
Zrobione ponownie. – barrycarter
Nie jestem pewien, czy to pomaga, ale "p [n, m]/n^(m-2)" wydaje się liniowe w n dla wszystkich wartości m, ale z przechwyceniem nie-0. – barrycarter