A112231 - OEIS

A112231

Repeat each prime in the sequence of natural numbers.

1, 2, 2, 3, 3, 4, 5, 5, 6, 7, 7, 8, 9, 10, 11, 11, 12, 13, 13, 14, 15, 16, 17, 17, 18, 19, 19, 20, 21, 22, 23, 23, 24, 25, 26, 27, 28, 29, 29, 30, 31, 31, 32, 33, 34, 35, 36, 37, 37, 38, 39, 40, 41, 41, 42, 43, 43, 44, 45, 46, 47, 47, 48, 49, 50, 51, 52, 53, 53, 54, 55, 56, 57, 58

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

COMMENTS

a(n) = A112233(n) - A112232(n);

a(n + A000040(n) - 1) = A000040(n),

a(n + A000040(n)) = A000040(n),

a(n + A000040(n) + 1) = A000040(n) + 1.

LINKS

Table of n, a(n) for n=1..74.

MATHEMATICA

Table[If[PrimeQ[n], {n, n}, n], {n, 70}]//Flatten (* Harvey P. Dale, Aug 12 2019 *)