

A177018


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


3



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
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

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


EXAMPLE

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


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[i1]+A067076[i]+i2);
a[i]:= q  A067076[i]i+1;
od:
convert(a, list); # Robert Israel, Mar 05 2020


PROG

(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 */


CROSSREFS

Cf. A067076, A169915, A175540.
Sequence in context: A073750 A270059 A120204 * A156349 A237526 A240117
Adjacent sequences: A177015 A177016 A177017 * A177019 A177020 A177021


KEYWORD

nonn


AUTHOR

Vincenzo Librandi, May 22 2010


EXTENSIONS

Better definition from M. F. Hasler, Jun 18 2010
Edited by N. J. A. Sloane, Jul 18 2010


STATUS

approved



