[go: up one dir, main page]

login
A113091
Column 1 of triangle A113090.
1
1, 12, 255, 11326, 1136709, 272246616, 162043308555, 246976754748242, 985451332639242321, 10465989453804481920460, 299684548041297413533699479, 23373481327888949572209959486022, 5007060652963472122780384849366677469
OFFSET
1,2
PROG
(PARI) {a(n)=local(M=matrix(n+1, n+1)); for(r=1, n+1, for(c=1, r, M[r, c]=if(r==c, 1, if(c>1, (M^3)[r-1, c-1])+(M^3)[r-1, c]))); return(if(n<1, 0, (M^3)[n+1, 2]))}
CROSSREFS
Cf. A113090.
Sequence in context: A034672 A133285 A239778 * A053324 A297717 A352971
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Oct 14 2005
STATUS
approved