|
|
A001357
|
|
Powers of 2 written in base 9.
(Formerly M1138 N0434)
|
|
5
|
|
|
1, 2, 4, 8, 17, 35, 71, 152, 314, 628, 1357, 2725, 5551, 12212, 24424, 48848, 108807, 218715, 438531, 878162, 1867334, 3845668, 7802447, 16705005, 34511011, 70122022, 150244044, 310488088, 621087187, 1342185385, 2684381781, 5478773672, 12068657454, 24148426018
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
REFERENCES
|
Archimedeans Problems Drive, Eureka, 14 (1951), 13.
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
|
|
LINKS
|
|
|
MAPLE
|
b:= proc(n) local m; m:= n; "";
while m>0 do irem(m, 9, 'm'), % od;
parse(cat(%))
end:
a:= n-> b(2^n):
|
|
MATHEMATICA
|
Table[FromDigits[IntegerDigits[2^n, 9]], {n, 0, 30}] (* T. D. Noe, Jun 28 2012 *)
|
|
PROG
|
(PARI) {for(ixp=0, 34,
casi = 2^ixp; cvst=0;
while(casi != 0,
cvd = casi%9; cvst=10*cvst + cvd + 1; casi = (casi - cvd) / 9 );
while(cvst !=0,
ptch = cvst%10; print1(ptch-1); cvst = (cvst - ptch) / 10 );
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|