A136173 Column 2 of triangle A136170.

1, 3, 25, 480, 20657, 1906051, 378639419, 163267272113, 155845755656250, 335843460383424796, 1664976879959626195703, 19289660262281670383124691, 529079225669745804554669074826, 34719352972951195290492954195861372

Offset

0,2

Links

Table of n, a(n) for n=0..13.

Prog

(PARI) /* Generate using matrix power method: */ a(n)=local(A=Mat(1), B); for(m=1, n+3, B=matrix(m, m); for(i=1, m, for(j=1, i, if(j==i, B[i, j]=1, B[i, j]=(A^(fibonacci(i-1)))[i-1, j]); )); A=B); return( ((A)[n+3, 3]))
(PARI) /* Generate using partial sums method: */ a(n)=local(A=vector(n+1), p); A[1]=1; for(j=1, n, p=fibonacci(n+4)-fibonacci(n-j+4)-j; A=Vec((Polrev(A)+x*O(x^p))/(1-x))); A[ #A]

Crossrefs

Cf. A136170, A136171, A136172.

Sequence in context: A336804 A272482 A356404 * A243440 A306783 A003024

Adjacent sequences: A136170 A136171 A136172 * A136174 A136175 A136176

Keyword

nonn

Author

Paul D. Hanna, Dec 17 2007

Status

approved