|
Search: id:A107718
|
|
| |
|
| 1, 6, 57, 723, 11361, 212151, 4584081, 112480887, 3090105921, 93988998183, 3136338148017, 113945190405303, 4477940877230625, 189296643095867847, 8565988634172222609, 413169192012610306263, 21161884092470464784385
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
Equals one-half of column 0 of A107719 shift 1 place left.
|
|
PROGRAM
|
(PARI) {a(n)=if(n<0, 0, (matrix(n+2, n+2, m, j, if(m>=j, if(m==j, 1, if(m==j+1, -3*j, polcoeff(1/sum(i=0, m-j, prod(r=0, i-1, 3*r+1)*x^i)+O(x^m), m-j)))))^-1)[n+2, 2])}
|
|
CROSSREFS
|
Cf. A107717, A107719.
Sequence in context: A141372 A152170 A087659 this_sequence A000406 A032119 A145170
Adjacent sequences: A107715 A107716 A107717 this_sequence A107719 A107720 A107721
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Paul D. Hanna (pauldhanna(AT)juno.com), May 30 2005
|
|
|
Search completed in 0.002 seconds
|
