A144690
Limit of the coefficient of x^(2^m+n) in B(x)^(n+1) as m grows, where B(x) = Sum_{k>=0} x^(2^k).
Original entry on oeis.org
1, 2, 6, 16, 130, 636, 5712, 34336, 811458, 7151380, 113034746, 1049982792, 25276020640, 293841338896, 5712436923000, 68827002466176, 3739997267623490, 60752008945662372, 1718332635327516238, 26832922324005759560, 1099199814287516279394
Offset: 0
-
{ a(n) = local(m=n+log(n+.5)\log(2), B=sum(k=0,m,x^(2^k)));if(n<0, 0, polcoeff((B+O(x^(2^m+n+1)))^(n+1),2^m+n)) }
a(14), a(15) corrected and a(16)-a(23) added by
Max Alekseyev, May 03 2011
A135068
a(n) = [x^(2^n+n-1)] (x + x^2 + x^4 + x^8 + ... + x^2^n)^n for n>=1.
Original entry on oeis.org
1, 2, 6, 16, 90, 636, 5712, 34336, 537282, 5941780, 99729146, 1049982792, 23200347040, 293841338896, 5712436923000, 68827002466176, 2844850573581890, 53069160498788772, 1545326270301621838, 26021954987946879560, 1020860369624228471394, 19905401189634441143740, 605270985059438427438138, 11141784565490367848976336, 621465511993167908247508400, 14470690420043042111787089216, 548187222712632324159956010732, 11881058908943228840652007583056
Offset: 1
-
f[x_, n_] := (Sum[x^(2^k), {k, 0, n}])^n; Table[Coefficient[f[x, n], x^(2^n + n - 1)] , {n, 1, 20}] (* G. C. Greubel, Sep 22 2016 *)
-
a(n)=if(n<1,0,polcoeff(sum(j=0,n,x^(2^j)+O(x^(2^n+n)))^n,2^n+n-1))
A135069
a(n) = [x^(2^n+n-1)] (x + x^2 + x^4 + x^8 + ... + x^(2^n))^n / n for n>=1.
Original entry on oeis.org
1, 1, 2, 4, 18, 106, 816, 4292, 59698, 594178, 9066286, 87498566, 1784642080, 20988667064, 380829128200, 4301687654136, 167344151387170, 2948286694377154, 81332961594822202, 1301097749397343978, 48612398553534689114, 904790963165201870170, 26316129785192975106006, 464241023562098660374014, 24858620479726716329900336, 556565016155501619684118816, 20303230470838234228146518916, 424323532462258172880428842252
Offset: 1
-
f[x_, n_] := (1/n)*(Sum[x^(2^k), {k, 0, n}])^n; Table[Coefficient[f[x, n], x^(2^n + n - 1)] , {n, 1, 10}] (* G. C. Greubel, Sep 22 2016 *)
-
{a(n)=if(n<1,0,polcoeff(sum(j=0,n,x^(2^j)+O(x^(2^n+n)))^n,2^n+n-1)/n)}
A135071
a(n) = [x^(2^n+n-2)] (x + x^2 + x^4 + x^8 + ... + x^(2^n))^n /(n*(n-1)/2) for n>=2.
Original entry on oeis.org
1, 1, 3, 7, 40, 236, 1876, 9948, 147880, 1453960, 22015900, 208197540, 4313645260, 50025596492, 908013578304, 10257540119128, 410662921858728, 7157148265575464, 196798065310375948, 3119117728942974484, 117123479632632724204, 2164788189493906776364, 62917262965957689991564, 1107373183582759036993164, 59647207431378288643241916, 1329593013280581859290571836, 48482067282133360326936987936
Offset: 2
-
f[x_, n_] := (1/Binomial[n, 2])*(Sum[x^(2^k), {k, 0, n}])^n; Table[Coefficient[f[x, n], x^(2^n + n - 2)] , {n, 2, 10}] (* G. C. Greubel, Sep 22 2016 *)
-
{a(n)=if(n<2,0,polcoeff(sum(j=0,n,x^(2^j)+O(x^(2^n+n)))^n,2^n+n-2)/(n*(n-1)/2))}
Showing 1-4 of 4 results.
Comments