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

Author

Artur Jasinski, Jan 29 2007

Keywords

• nonn

Crossrefs

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

Programs

Mathematica

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