A119994 Fixed point of the morphism a -> {a, a + 1, Prime(a + 1)}, beginning with 0.

0, 1, 2, 1, 2, 3, 2, 3, 5, 1, 2, 3, 2, 3, 5, 3, 4, 7, 2, 3, 5, 3, 4, 7, 5, 6, 13, 1, 2, 3, 2, 3, 5, 3, 4, 7, 2, 3, 5, 3, 4, 7, 5, 6, 13, 3, 4, 7, 4, 5, 11, 7, 8, 19, 2, 3, 5, 3, 4, 7, 5, 6, 13, 3, 4, 7, 4, 5, 11, 7, 8, 19, 5, 6, 13, 6, 7, 17, 13, 14, 43, 1, 2, 3, 2, 3, 5, 3, 4, 7, 2, 3, 5, 3, 4, 7, 5, 6, 13

Offset

0,3

Comments

First occurrence of k: 1, 2, 3, 6, 17, 9, 26, 18, 53, 158, 473, 51, 152, 27, 80, 239, 716, 78, 233, 54, 161, 482, 1445, 159, 476, 1427, ...,.

Links

Table of n, a(n) for n=0..98.

Mathematica

Nest[ Flatten[ #1 /. a_Integer -> {a, a + 1, Prime[a + 1]}] &, {0}, 5]

Crossrefs

Sequence in context: A076827 A165477 A318687 * A029167 A161103 A337879

Adjacent sequences: A119991 A119992 A119993 * A119995 A119996 A119997

Keyword

nonn

Author

Robert G. Wilson v, Aug 02 2006

Status

approved