|
%I #16 Oct 30 2022 18:19:59
%S 3,31,191,5119,524287,3758096383,1618481116086271,
%T 5359447279004780799548150067050349330431,
%U 2817103802133904744169307240538184064530443801964688726052818649087
%N Primes of form n*4^n - 1.
%H Harry J. Smith, <a href="/A060425/b060425.txt">Table of n, a(n) for n=1,...,12</a>
%t lst={};Do[p=n*4^n-1;If[PrimeQ[p],AppendTo[lst,p]],{n,0,5!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Jan 28 2009 *)
%o (PARI) { n=0; for (m=1, 530, if (isprime(a=m*4^m - 1), write("b060425.txt", n++, " ", a)); ) } \\ _Harry J. Smith_, Jul 04 2009
%K nonn
%O 1,1
%A _Jason Earls_, Apr 05 2001
%E More terms from _Reiner Martin_, Jul 20 2001
|
