|
Search: id:A113087
|
|
| |
|
| 1, 2, 8, 68, 1252, 51724, 5000468, 1176844012, 696653833108, 1063944196415276, 4273738134967763028, 45828521528368595280876, 1327368163105850592309345044, 104832927462400739554960944906668
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
PROGRAM
|
(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(sum(k=1, n+1, M[n+1, k]))}
|
|
CROSSREFS
|
Cf. A113084.
Sequence in context: A156448 A157752 A055547 this_sequence A099729 A123117 A062733
Adjacent sequences: A113084 A113085 A113086 this_sequence A113088 A113089 A113090
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Paul D. Hanna (pauldhanna(AT)juno.com), Oct 14 2005
|
|
|
Search completed in 0.002 seconds
|
