A250073 Powers of 2 written in base 60, concatenating the decimal values of the sexagesimal digits.

1, 2, 4, 8, 16, 32, 104, 208, 416, 832, 1704, 3408, 10816, 21632, 43304, 90608, 181216, 362432, 1124904, 2253808, 4511616, 9423232, 19250504, 38501008, 117402016, 235204032, 510412104, 1021224208, 2042452416, 4125304832, 12251013704, 24542031408, 53124062816

Offset

0,2

Comments

Each sexagesimal digit appears as a pair of decimal digits as on a digital clock. Any leading zeros are truncated. Thus decimal 64 appears as "104" and not "0104".

Links

Table of n, a(n) for n=0..32.

Example

a(7) = 208, since 2^7 = 128 = 2 sixties plus 8, thus 2:08 in clock-like notation, which becomes 208 when restricted to the numeric characters.

Mathematica

a250073[n_Integer] :=
FromDigits@
  StringJoin[
   If[# < 10, StringJoin["0", ToString[#]], ToString[#]] & /@
IntegerDigits[2^n, 60]]; a250073 /@ Range[60] (* Michael De Vlieger, Nov 11 2014 *)

Prog

(PARI) a(n) = {d = digits(2^n, 60); s = ""; for (i=1, #d, if (d[i] < 10, s = concat(s, "0")); s = concat(s, Str(d[i]))); eval(s); } \\ Michel Marcus, Nov 12 2014

Crossrefs

Cf. A000079.

Sequence in context: A195458 A264656 A078227 * A260873 A138814 A233424

Adjacent sequences: A250070 A250071 A250072 * A250074 A250075 A250076

Keyword

nonn,base

Author

Michael De Vlieger, Nov 11 2014

Status

approved