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

Author

Omar E. Pol, Nov 17 2008

Keywords

• easy
• nonn
• less

Crossrefs

Cf. A000040, A001223, A046933, A141042.

Programs

Mathematica

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

Extensions

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