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, ...,.

MATHEMATICA

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

CROSSREFS

KEYWORD

nonn

AUTHOR

Robert G. Wilson v, Aug 02 2006

STATUS

approved