A100105 a(n) = 2^prime(n)-prime(n).
2, 5, 27, 121, 2037, 8179, 131055, 524269, 8388585, 536870883, 2147483617, 137438953435, 2199023255511, 8796093022165, 140737488355281, 9007199254740939, 576460752303423429, 2305843009213693891
Offset: 1
Keywords
Links
- N. J. A. Sloane, Table of n, a(n) for n = 1..100
Programs
-
Magma
[2^p - p: p in PrimesUpTo(80)]; // Vincenzo Librandi, Jun 03 2014
-
Maple
seq( (2^ithprime(x)-ithprime(x)),x=1..20);
-
Mathematica
f[n_]:=(2^Prime[n]-Prime[n]); Array[f,4!,1] (* Vladimir Joseph Stephan Orlovsky, Oct 17 2009 *)