A147965 a(n) = n + 1 - A001223(n) = n - A046933(n). In words, a(n) is the difference between n+1 and the n-th gap between primes.

1, 1, 2, 1, 4, 3, 6, 5, 4, 9, 6, 9, 12, 11, 10, 11, 16, 13, 16, 19, 16, 19, 18, 17, 22, 25, 24, 27, 26, 17, 28, 27, 32, 25, 34, 31, 32, 35, 34, 35, 40, 33, 42, 41, 44, 35, 36, 45, 48, 47, 46, 51, 44, 49, 50, 51, 56, 53, 56, 59

Offset

1,3

Links

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

Mathematica

Module[{nn=70, prg}, prg=Differences[Prime[Range[nn]]]; #[[2]]-#[[1]]&/@ Thread[{prg, Range[nn-1]}]+1] (* Harvey P. Dale, Nov 21 2021 *)

Crossrefs

Cf. A000040, A001223, A046933, A141042.

Sequence in context: A076981 A355678 A355679 * A167542 A167419 A114285

Adjacent sequences: A147962 A147963 A147964 * A147966 A147967 A147968

Keyword

easy,nonn,less

Author

Omar E. Pol, Nov 17 2008

Extensions

Definition corrected by N. J. A. Sloane, Nov 21 2021, at the suggestion of Harvey P. Dale.

Status

approved