0,2
(PARI) {a(n)=local(A, B); A=matrix(1, 1); A[1, 1]=1; for(m=2, n+4, B=matrix(m, m); for(i=1, m, for(j=1, i, if(i<3|j==i|j>m-1, B[i, j]=1, if(j==1, B[i, 1]=1, B[i, j]=(A^(j*(j+1)/2))[i-j+1, 1])); )); A=B); A[n+4, 4]}
Cf. A134523 (triangle); other columns: A134524, A134525.
Adjacent sequences: A134523 A134524 A134525 this_sequence A134527 A134528 A134529
Sequence in context: A113354 A027397 A081697 this_sequence A055761 A095889 A097638
nonn
Paul D. Hanna (pauldhanna(AT)juno.com), Nov 15 2007
Search completed in 0.002 seconds