A127795 Nextprime(8^n)-8^n.

1, 3, 3, 9, 3, 3, 3, 17, 43, 29, 3, 17, 31, 23, 15, 59, 21, 21, 159, 9, 33, 29, 9, 29, 15, 33, 7, 17, 3, 39, 133, 105, 61, 255, 267, 39, 33, 51, 43, 29, 451, 165, 7, 17, 67, 33, 87, 5, 175, 51, 147, 95, 45, 299, 19, 141, 87, 129, 7, 75, 15, 215, 205, 35, 133, 35, 15, 351, 7, 203

Offset: 0

Author

Artur Jasinski, Jan 29 2007

Keywords

• nonn

Comments

"Nextprime(k)" is not well-defined: it can mean the smallest prime >= k or the smallest prime > k. Of course here it does not matter. - N. J. A. Sloane, Jan 31 2007

Crossrefs

Cf. A013597, A013598, A013602, A013599, A013600, A013601, A127796, A033873, A127797, A127798, A127799.

Programs

Mathematica

np[n_]:=Module[{n8=8^n},NextPrime[n8]-n8]; Array[np,70,0] (* Harvey P. Dale, Jun 20 2011 *)

Extensions

Erroneous Mathematica program deleted by Harvey P. Dale, Jun 20 2011