Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%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_.