A061591 a(n) = 2^x, where x = p*(p-1)/2 and p is the n-th prime.
2, 8, 1024, 2097152, 36028797018963968, 302231454903657293676544, 87112285931760246646623899502532662132736, 2993155353253689176481146537402947624255349848014848
Offset: 1
Keywords
Links
- Harry J. Smith, Table of n, a(n) for n = 1..22
Programs
-
Mathematica
Table[2^((p(p-1))/2),{p,Prime[Range[10]]}] (* Harvey P. Dale, Sep 03 2024 *)
-
PARI
{ n=0; forprime (p=2, prime(22), write("b061591.txt", n++, " ", 2^(p*(p - 1)/2)) ) } \\ Harry J. Smith, Jul 25 2009
Extensions
Offset changed from 2 to 1 by Harry J. Smith, Jul 25 2009