login
A181729
Primes of the form A181737(k)+1.
0
3, 7, 43, 547, 9283, 593966822339511354494269574612265371991631567
OFFSET
1,1
COMMENTS
The next term has 500 digits and is too large to be displayed here.
PROG
(Magma) z:=55; S:=[2, 3]; p:=5; for n in [3..z] do while not IsPrime(Abs(S[n-2]+S[n-1]-p)) do p:=NextPrime(p); end while; Append(~S, p); p:=NextPrime(p); end for; T:=[ n eq 1 select S[1] else Self(n-1)*S[n]: n in [1..#S] ]; [ p: n in [1..#T] | IsPrime(p) where p is T[n]+1 ]; // Klaus Brockhaus, Dec 19 2010
CROSSREFS
Sequence in context: A258435 A074268 A019026 * A162455 A143684 A156893
KEYWORD
nonn
AUTHOR
Giovanni Teofilatto, Nov 16 2010
STATUS
approved