OFFSET
1,1
FORMULA
a(n) = A000040(2^(n-1)*(2*n-1)).
MATHEMATICA
Table[Prime[2^(n - 1)*(2*n - 1)], {n, 26}]
PROG
(Magma) [NthPrime(2^(n-1)*(2*n-1)): n in [1..20]]; // Vincenzo Librandi, Nov 23 2015
(PARI) a(n)=if(n<1, print1("Error n < 1"), prime(2^(n-1)*(2*n-1)) \\ Anders Hellström, Nov 23 2015
(Perl) use ntheory ":all"; say "$_ ", nth_prime(2**($_-1) * (2*$_-1)) for 1..50; # Dana Jacobsen, Apr 28 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
L. Edson Jeffery, Nov 22 2015
STATUS
approved