login
A144723
a(n)= primes arising A144722
12
7, 19, 73, 433, 3457, 72577, 1669249, 43400449, 1302013441, 46872483841, 1734281902081, 67636994181121, 2840753755607041, 153400702802780161, 8743840059758469121, 638300324362368245761, 52978926922076564398081
OFFSET
1,1
MATHEMATICA
k = 3; a = {}; Do[If[PrimeQ[k n + 1], AppendTo[a, k n+1 ]; k = k n ], {n, 1, 3000}]; a (*Artur Jasinski*)
KEYWORD
nonn
AUTHOR
Artur Jasinski, Sep 19 2008
STATUS
approved