(PARI){m=33;v=concat([1,2,4,7],向量(m-4));对于(n=5,m,v[n]=5*v[n-1]-9*v[n-2]+6*v[n3]);v}/* \\ _克劳斯·布罗克豪斯, _, 2007年6月10日 */
(MAGMA)m:=33;M: =零矩阵(整数环(),M,M);对于j:=1到m do,如果(j-1)mod 6 lt 3,则m[j,1]:=1;结束条件:;结束;对于k:=2到m do,对于j:=k到m doM[j,k]:=m[j-1,k-1]+m[j、k-1];结束;结束;[1..M]]中的[M[n,n]:n/* _/ _Klaus Brockhaus,2007年6月10日 */
(MAGMA)m:=33;S: =[1,1,1,0,0,0][(n-1)mod 6+1]:n in[1..m]];[&+[二项式(i-1,k-1)*S[k]:k in[1..i]]:i in[1..m]];- _// _Klaus Brockhaus,2007年6月17日