A115733 prime(n)-n, repeated (prime(n)-n) times.

1, 1, 2, 2, 3, 3, 3, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 10, 10, 10, 10, 10, 10, 10, 10, 10, 10, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19, 19

Offset

1,3

Links

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

Mathematica

Flatten@Table[Prime[n]-n, {n, 10}, {Prime[n]-n}]

Crossrefs

Cf. A014689, A115732, A002024.

Sequence in context: A175454 A157501 A080968 * A025496 A099959 A099964

Adjacent sequences: A115730 A115731 A115732 * A115734 A115735 A115736

Keyword

nonn,less

Author

Zak Seidov, Jan 30 2006

Status

approved