|
%I #7 Aug 25 2014 11:29:33
%S 3,7,31,211,2311,43891,1272811,16546531,976245271,36121074991,
%T 1119753324691,52628406260431,3526103219448811,186883470630786931,
%U 7662222295862264131,743235562698639620611,54256196077000692304531
%N Primes arising in A083771.
%o (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 }
%Y Cf. A039726, A083771.
%K nonn
%O 1,1
%A _Amarnath Murthy_ and Meenakshi Srikanth (menakan_s(AT)yahoo.com), May 06 2003
%E More terms from _Rick L. Shepherd_, Mar 18 2004
|
