|
| |
|
|
A083772
|
|
Primes arising in A083771.
|
|
2
| |
|
|
3, 7, 31, 211, 2311, 43891, 1272811, 16546531, 976245271, 36121074991, 1119753324691, 52628406260431, 3526103219448811, 186883470630786931, 7662222295862264131, 743235562698639620611, 54256196077000692304531
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
PROG
| (PARI) { terms=20; a=A083771=vector(terms); A083771[1]=2; tmp=1; a[1]=3; for(k=2, terms, tmp=tmp*A083771[k-1]; p=1; while(1, until(isprime(p), p=p+2); for(m=1, k-1, if(p==A083771[m], break, if(m==k-1, if(isprime(tmp*p+1), A083771[k]=p; a[k]=tmp*p+1; print1(a[k], ", "); break(2))))))); a }
|
|
|
CROSSREFS
| Cf. A039726, A083771.
Sequence in context: A002585 A103785 * A093441 A087864 A066676 A073917
Adjacent sequences: A083769 A083770 A083771 * A083773 A083774 A083775
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Amarnath Murthy and Meenakshi Srikanth (amarnath_murthy(AT)yahoo.com), May 06 2003
|
|
|
EXTENSIONS
| More terms from Rick L. Shepherd (rshepherd2(AT)hotmail.com), Mar 18 2004
|
| |
|
|
