



1, 2, 8, 68, 1252, 51724, 5000468, 1176844012, 696653833108, 1063944196415276, 4273738134967763028, 45828521528368595280876, 1327368163105850592309345044, 104832927462400739554960944906668
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,2


LINKS

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


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)[r1, c1])+(M^3)[r1, c]))); return(sum(k=1, n+1, M[n+1, k]))}


CROSSREFS

Cf. A113084.
Sequence in context: A192550 A157752 A055547 * A239843 A099729 A123117
Adjacent sequences: A113084 A113085 A113086 * A113088 A113089 A113090


KEYWORD

nonn


AUTHOR

Paul D. Hanna, Oct 14 2005


STATUS

approved



