##初始化列表列表https://oeis.org/A048004#递归:T(n+1,k)=和{h=0..k}T(n-k,h)+和{i=n-k+1..n}T(i,k);#例如,T(7,3)=Sum{h=0..3}T(3,h)+Sum{i=4..6}T(i,3)或T(7,1)=(1+4+2+1)+(2+5+12)=27。#示例:T(4,2)=(1+1)+(1+2)=5.-Richard Southern,2017年7月9日#高阶斐波那契数:H(n,k)=Sum_{H=0…k}T(n,k}#例如H(7,3)=Sum{H=0…3}T(7,k}或H(7,1)=1+33+47+27=108第11个四Nacci数。#行T(7,k)生成行H(7,k)列表,其中包含1,34,80108120125127128,即1,9th斐波那契,10th tribonacci,…15th辛烷值~~~~#注意,缺少的数字只有1、2、4、8、16、32,所以请填写右边的列表矩阵=[[1],[1,1],[],[][,[]n=1当n<19时:k=0j=n+1而k<=j:g=n-k如果k==0:项目=1矩阵[j].追加(项)如果k>0并且k<j:r=0c=0h=0#行中的总和而h<=k:#打印('r',r,n,g,h,matrix)如果h<=g:r=r+矩阵[g][h]h=小时+1i=n-k+1#对列进行汇总当i<=n时:#打印('c',c,n,i,k,矩阵)如果i>=n-k+1和k<=i:c=c+矩阵[i][k]i=i+1项目=r+c#第j行中的新列矩阵[j].追加(项)如果k==j:#对角线定义为等于1项目=1矩阵[j].追加(项)k=k+1n=n+1#显示列表对于矩阵中的行:打印(行)#另存为字符串打开('MarixListofList','w')为f:s=str(矩阵)f.写入f.关闭()#高阶斐波那契数H=[[],[],[],[,[]n=0当n<19时:总和=0k=0当k<19时:如果k<=n:总和=总和+矩阵[n][k]#第n行中的新列H[n].append(总和)#打印(n,k,总和)其他:H[n].append(总和)#下一列k=k+1#下一行总和=0n=n+1#显示列表高阶fibonacci对于H中的行:打印(行)#另存为字符串打开('HighListofList','w')为f:s=str(H)f.写入f.关闭()