A006937 Convert the last term from decimal to binary! a(1)=10.
10, 1010, 1111110010, 1000010001110100011000101111010, 1100100111110011010011100010101000011000101001000100011011011010001111011100010000001000010011100010
Offset: 1
References
- C. Pickover, Mazes for the Mind, St. Martin's Press, NY, 1992, p. 350.
- N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
Crossrefs
Essentially the same as A008559.
Programs
-
Mathematica
NestList[FromDigits[IntegerDigits[#,2]]&,10,5] (* Harvey P. Dale, Aug 10 2011 *)
Comments