A127799 Nextprime(13^n)-13^n.

1, 4, 4, 6, 10, 6, 4, 6, 18, 46, 4, 34, 22, 16, 58, 4, 72, 28, 42, 34, 30, 166, 60, 16, 136, 46, 94, 66, 276, 30, 70, 136, 70, 18, 60, 142, 228, 10, 462, 12, 28, 166, 138, 12, 376, 16, 180, 102, 222, 228, 102, 126, 108, 46, 24, 172, 162, 6, 114, 6, 108, 6, 72, 84, 22, 70

Offset

0,2

Links

Table of n, a(n) for n=0..65.

Mathematica

np13[n_]:=Module[{c=13^n}, NextPrime[c]-c]; Array[np13, 70, 0] (* Harvey P. Dale, Mar 31 2012 *)

Crossrefs

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

Sequence in context: A343985 A128037 A102414 * A213375 A226834 A098052

Adjacent sequences: A127796 A127797 A127798 * A127800 A127801 A127802

Keyword

nonn

Author

Artur Jasinski, Jan 29 2007

Status

approved