0,3
Table of n, a(n) for n=0..17.
(PARI) {a(n)=local(A=matrix(2, 2), B); A[1, 1]=1; for(m=2, n+1, B=matrix(m, m); for(i=1, m, for(j=1, i, if(j==i, B[i, j]=1, if(j==1, B[i, j]=(A^2)[i-1, 1], B[i, j]=(A^2)[i-1, j]-(A^2)[i-1, j-1])); )); A=B); return((A^2)[n+1, 2])}
Cf. A102225, A102226, A102227, A102228.
Sequence in context: A190816 A084910 A124024 * A038501 A009350 A063092
Adjacent sequences: A102226 A102227 A102228 * A102230 A102231 A102232
sign
Paul D. Hanna, Jan 01 2005
approved