A177018 a(n) is the smallest integer >= a(n-1) such that a(n) + A067076(n) + n-1 is an odd prime.

3, 3, 3, 4, 4, 5, 5, 6, 8, 8, 10, 11, 11, 12, 14, 16, 16, 18, 19, 19, 21, 22, 24, 27, 28, 28, 29, 29, 30, 36, 37, 39, 39, 43, 43, 45, 47, 48, 50, 52, 52, 56, 56, 57, 57, 62, 67, 68, 68, 69, 71, 71, 75, 77, 79, 81, 81, 83, 84, 84, 88, 94, 95, 95

Offset: 1

Author

Vincenzo Librandi, May 22 2010

Keywords

• nonn

Examples

			3+0+0=3; 3+1+1=5; 3+2+2=7; 4+4+3=11; 4+5+4=13; etc.
		

Links

• Robert Israel, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A067076, A169915, A175540.

Programs

Maple

N:= 100: # for a(1)..a(N)
A067076:= [seq((ithprime(i)-3)/2, i=2..N+1)]:
a:= Vector(N):
a[1]:= 3:
for i from 2 to N do
  q:= nextprime(a[i-1]+A067076[i]+i-2);
  a[i]:= q - A067076[i]-i+1;
od:
convert(a,list); # Robert Israel, Mar 05 2020

PARI

n=0; c=0;for(i=1,99, t = n+c+A067076(c); if( t%2 == 1 && isprime(t), print1(n", "); c++,/*else*/ n++ )) /* M. F. Hasler, Jun 18 2010 */

Extensions

Better definition from M. F. Hasler, Jun 18 2010

Edited by N. J. A. Sloane, Jul 18 2010