OFFSET
1,1
EXAMPLE
3, 15, 63, 255, 1023, 4095, 16383, ...
MATHEMATICA
FromDigits[#] & /@ Partition[ Flatten@ IntegerDigits@ Table[4^n - 1, {n, 22}], 3] (* Robert G. Wilson v, Jun 23 2014 *)
PROG
(Python)
from itertools import count, islice
def bgen(): yield from (d for n in count(1) for d in str((1 << 2*n)-1))
def agen(): g = bgen(); yield from (int("".join(t)) for t in zip(g, g, g))
print(list(islice(agen(), 54))) # Michael S. Branicky, Dec 25 2022
CROSSREFS
KEYWORD
base,dumb,nonn
AUTHOR
Jonathan Vos Post, Feb 19 2006
EXTENSIONS
a(4) and following changed by Georg Fischer, Dec 25 2022
STATUS
approved