|
Search: id:A117161
|
|
| |
|
| 1, 1, 3, 6, 15, 31, 73, 157, 358, 785, 1762, 3896, 8702, 19299, 42995, 95507, 212552, 472445, 1050973, 2336670, 5197036, 11556157, 25700188, 57150018, 127093805, 282627186, 628514815, 1397684691, 3108193486, 6911996344, 15370966058
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
COMMENT
|
Equals the self-convolution inverse of A117166, where
A117166 is the Shift-Moebius transform of [1,0,0,0,...]
(see A117165 for the Shift-Moebius transform coefficients).
Limit_{n->oo} a(n+1)/a(n) = 2.223805416529545241557...
|
|
PROGRAM
|
(PARI) {a(n)=if(n<1, 0, SM=prod(i=0, n, matrix(n, n, r, c, if(r>=c, if((r+n-i)%(c+n-i)==0, moebius((r+n-i)/(c+n-i)), 0)))); RV=SM*vector(n, i, if(i==1, 1, 0))~; return(Vec(1/Ser(RV))[n]))}
|
|
CROSSREFS
|
Cf. A112682, A117166 (inverse), A117165 (Shift-Moebius).
Sequence in context: A126982 A034739 A097941 this_sequence A006961 A034740 A152167
Adjacent sequences: A117158 A117159 A117160 this_sequence A117162 A117163 A117164
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Wouter Meeussen (wouter.meeussen(AT)pandora.be) and Paul D. Hanna (pauldhanna(AT)juno.com), Feb 28 2006
|
|
|
Search completed in 0.002 seconds
|
