login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

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

%I #14 Nov 21 2021 20:17:18

%S 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,

%T 27,26,17,28,27,32,25,34,31,32,35,34,35,40,33,42,41,44,35,36,45,48,47,

%U 46,51,44,49,50,51,56,53,56,59

%N 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.

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

%Y Cf. A000040, A001223, A046933, A141042.

%K easy,nonn,less

%O 1,3

%A _Omar E. Pol_, Nov 17 2008

%E Definition corrected by _N. J. A. Sloane_, Nov 21 2021, at the suggestion of _Harvey P. Dale_.