A116555 a(2*n+1) = 9*a(n), a(2*n+2) = 10*a(n) + a(n-1).
1, 9, 10, 81, 91, 90, 109, 729, 820, 819, 991, 810, 991, 981, 1180, 6561, 7399, 7380, 8929, 7371, 9010, 8919, 10729, 7290, 9091, 8919, 10720, 8829, 10801, 10620, 12781, 59049, 66790, 66591, 80551, 66420, 81199, 80361, 96670, 66339, 82639, 81090
Offset: 0
Links
- G. C. Greubel, Table of n, a(n) for n = 0..2500
Programs
-
Mathematica
b[0] := 0; b[1] := 1; b[n_?EvenQ] := b[n] = 9*b[n/2]; b[n_?OddQ] := b[n] = 10*b[(n - 1)/2] + b[(n - 3)/2]; Table[b[n], {n, 1, 70}]
Formula
Extensions
New name using formula, Joerg Arndt, Dec 17 2022