A164370 Sequence A005418 written in base 2.
1, 10, 11, 110, 1010, 10100, 100100, 1001000, 10001000, 100010000, 1000010000, 10000100000, 100000100000, 1000001000000, 10000001000000, 100000010000000, 1000000010000000, 10000000100000000, 100000000100000000, 1000000001000000000, 10000000001000000000, 100000000010000000000, 1000000000010000000000
Offset: 1
Links
- G. C. Greubel, Table of n, a(n) for n = 1..995
- Index entries for linear recurrences with constant coefficients, signature (10,10,-100).
Programs
-
Mathematica
Rest[CoefficientList[Series[x*(800*x^4 - 99*x^2 + 1)/((10*x - 1)*(10*x^2 - 1)), {x, 0, 50}], x]] (* G. C. Greubel, Sep 17 2017 *)
-
PARI
A005418(n)= 2^(n-2) + 2^(n\2-1); b2t(v)=sum(k=1,#v,v[#v+1-k]*10^(k-1)); a(n)=b2t(binary( A005418(n))); \\ Joerg Arndt, Sep 16 2013
-
PARI
x='x+O('x^50); Vec(x*(800*x^4-99*x^2+1)/((10*x-1)*(10*x^2-1))) \\ G. C. Greubel, Sep 17 2017
Formula
G.f.: x*(800*x^4-99*x^2+1) / ((10*x-1)*(10*x^2-1)). - Colin Barker, Sep 23 2013
Extensions
Edited by Joerg Arndt, Sep 16 2013
Comments