[其他] MAPLE程式求解惑
直接放上程式碼:
> FF := proc (C, n)
local p, P
[seq(1+~`+`~(seq([1$p,0$(n-p)],p=P)),
P=combinat:-partition(C-n,min(C-n,n)))]
end proc
---------------------------------------------------------------------
這個程式在做整數分拆,輸入整數C然後列出由n個正整數相加的所有解,
其中中間這段(因為很長所以分兩行)看不懂,
符號看了help還是不太懂像是 +~`+` 和後面的combanat:-partion的部分
[seq(1+~`+`~(seq([1$p,0$(n-p)],p=P)),
P=combinat:-partition(C-n,min(C-n,n)))]
這式子到底什麼魔法跑出整數分割的?
是不是什麼遞迴?
拜託各位大大們幫忙了......
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 36.229.198.69
※ 文章網址: https://www.ptt.cc/bbs/Math/M.1558543944.A.5EA.html
討論串 (同標題文章)
完整討論串 (本文為第 2 之 2 篇):