OFFSET
1,1
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..75
FORMULA
a(n+1) = A007094(a(n)), a(1) = 8. - Reinhard Zumkeller, Aug 29 2013
MATHEMATICA
NestList[ FromDigits[ IntegerDigits[ #, 8 ]] &, 8, 35 ]
PROG
(Haskell)
a008557 n = a008557_list !! (n-1)
a008557_list = iterate a007094 8 -- Reinhard Zumkeller, Aug 29 2013
(Python)
def aupton(terms):
alst = [8]
for n in range(2, terms+1): alst.append(int(oct(alst[-1])[2:]))
return alst
print(aupton(35)) # Michael S. Branicky, Aug 10 2021
CROSSREFS
KEYWORD
nonn,base,nice,easy
AUTHOR
sbv(AT)VNET.IBM.COM (Scott Vetter), msvetter(AT)eng.xyplex.com (Mark Vetter)
STATUS
approved