login
A094463
a(n) is the 7th term in Euclid-Mullin (EM) prime sequence initiated with n-th prime.
4
5, 5, 199, 5, 433, 1601, 31, 457, 7109609443, 5, 7, 127, 71, 5, 7, 2620003, 4583, 1217, 5, 67, 6729871, 39334891, 5, 53, 461, 449885311, 1511, 197, 7, 22008559, 19, 1249, 7, 7, 3217, 7, 7, 3931, 7, 110663370509047, 375155719, 29, 28529671, 23, 24603331
OFFSET
1,1
EXAMPLE
First term is p(n), 2nd equals 2;
3rd term is A091460 as largest p-divisor of 2p+1
(occasionally safe primes, A005385);
4th terms listed in A051614; 5th term is in A094461;
6th-7th terms in A094462, A094463;
MATHEMATICA
a[x_]:=First[Flatten [FactorInteger[Apply[Times, Table[a[j], {j, 1, x-1}]]+1]]]; ta=Table[0, {168}]; a[1]=1; Do[{a[1]=Prime[j], el=6}; Print[a[el]; ta[[j]]=a[el]; j++ ], {j, 1, 168}]; ta
KEYWORD
nonn
AUTHOR
Labos Elemer, May 06 2004
STATUS
approved