login
A119995
Fixed point of the morphism a -> {a, a + 1, Ceiling(Log(a + 1))}, beginning with 0.
0
0, 1, 0, 1, 2, 1, 0, 1, 0, 1, 2, 1, 2, 3, 2, 1, 2, 1, 0, 1, 0, 1, 2, 1, 0, 1, 0, 1, 2, 1, 2, 3, 2, 1, 2, 1, 2, 3, 2, 3, 4, 2, 2, 3, 2, 1, 2, 1, 2, 3, 2, 1, 2, 1, 0, 1, 0, 1, 2, 1, 0, 1, 0, 1, 2, 1, 2, 3, 2, 1, 2, 1, 0, 1, 0, 1, 2, 1, 0, 1, 0, 1, 2, 1, 2, 3, 2, 1, 2, 1, 2, 3, 2, 3, 4, 2, 2, 3, 2, 1, 2, 1, 2, 3, 2
OFFSET
0,5
COMMENTS
First occurrence of k: 1, 2, 5, 14, 41, 122, 365, 1094, 3281, 9842, 29525, 88574, 265721, 797162, 2391485, ...,.
MATHEMATICA
Nest[Flatten[ #1 /. a_Integer -> {a, a + 1, Ceiling[Log[10, a + 1]]}] &, {0}, 5]
CROSSREFS
Sequence in context: A318463 A030372 A065363 * A062756 A360676 A334107
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Aug 02 2006
STATUS
approved