

A367361


Comma transform of powers of 2.


3



12, 24, 48, 81, 63, 26, 41, 82, 65, 21, 42, 84, 68, 21, 43, 86, 61, 22, 45, 81, 62, 24, 48, 81, 63, 26, 41, 82, 65, 21, 42, 84, 68, 21, 43, 86, 61, 22, 45, 81, 62, 24, 48, 81, 63, 27, 41, 82, 65, 21, 42, 84, 69, 21, 43, 87, 61, 22, 45, 81, 62, 24, 49, 81, 63, 27, 41, 82, 65, 21, 42, 84, 69, 21, 43, 87, 61, 23, 46, 81
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,1


COMMENTS

See A367360 for further information.


LINKS



FORMULA



MATHEMATICA

FromDigits /@ Partition[Rest@ Flatten[{First[#], Last[#]} & /@ IntegerDigits[2^Range[0, 120]]], 2, 2] (* Michael De Vlieger, Nov 22 2023 *)


PROG

(Python)
from itertools import count, islice, pairwise
def S(): yield from (str(2**i) for i in count(0))
def agen(): yield from (int(t[1]+u[0]) for t, u in pairwise(S()))
(Python)
def A367361(n): return (60, 20, 40, 80)[n&3]+int(str(1<<n+1)[0]) if n else 12 # Chai Wah Wu, Dec 22 2023


CROSSREFS



KEYWORD

nonn,base


AUTHOR



STATUS

approved



