login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A117160 Column 1 of triangle A112682; also equals row sums of A112682 (with offset). 2
1, 1, 2, 4, 9, 19, 43, 94, 210, 464, 1035, 2295, 5111, 11352, 25259, 56145, 124888, 277669, 617554, 1373201, 3053883, 6790995, 15102178, 33583784, 74684504, 166082706, 369337117, 821331578, 1826484804, 4061741926, 9032530513 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

COMMENTS

G.f.: A(x) = g.f. of A117169 (Shift-Moebius[1,1,1,1,...]) divided by the g.f. of A117166 (Shift-Moebius[1,0,0,0,...]) (see A117165 for the Shift-Moebius transform coefficients).

Limit_{n->oo} a(n+1)/a(n) = 2.223805416529545241557...

LINKS

Table of n, a(n) for n=1..31.

PROG

(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)))); U=SM*vector(n, i, 1)~; V=SM*vector(n, i, if(i==1, 1, 0))~; return(Vec(Ser(U)/Ser(V))[n]))}

CROSSREFS

Cf. A112682, A117165 (Shift-Moebius), A117169, A117166, A117161.

Sequence in context: A347011 A206301 A026776 * A339156 A247623 A084083

Adjacent sequences:  A117157 A117158 A117159 * A117161 A117162 A117163

KEYWORD

nonn

AUTHOR

Wouter Meeussen and Paul D. Hanna, Feb 28 2006

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 29 07:42 EDT 2022. Contains 357090 sequences. (Running on oeis4.)