login
A164370
Sequence A005418 written in base 2.
1
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,2
COMMENTS
Union of A163449, A163664 and number 10.
FORMULA
G.f.: x*(800*x^4-99*x^2+1) / ((10*x-1)*(10*x^2-1)). - Colin Barker, Sep 23 2013
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 *)
PROG
(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
CROSSREFS
Sequence in context: A041216 A094026 A035526 * A287948 A287626 A059458
KEYWORD
nonn,base,less,easy
AUTHOR
Jaroslav Krizek, Aug 14 2009
EXTENSIONS
Edited by Joerg Arndt, Sep 16 2013
STATUS
approved