

A335594


a(n) is the first prime to start a sequence of exactly n primes under the iteration p > p + (p^21)/12.


0




OFFSET

1,1


COMMENTS

No further terms up to 10^8.


LINKS



EXAMPLE

a(3) = 5 because 5 starts a sequence of exactly 3 primes: 5 > 5+(5^21)/12 = 7 > 7+(7^21)/12 = 11, while 11 + (11^21)/12 = 21 is not prime, and 5 is the first prime to do so.


MAPLE

g:= p > p + (p^21)/12:
f:= proc(p)
if not isprime(p) then 0
else 1 + procname(g(p))
fi
end proc:
A:= Vector(5): A[1]:= 2: count:= 1:
p:= 3:
while count < 5 do
p:= nextprime(p);
v:= f(p);
if A[v] = 0 then count:= count+1; A[v]:= p; fi
od:
convert(A, list);


CROSSREFS



KEYWORD

nonn,more


AUTHOR



STATUS

approved



