login
A171228
n^(p-n) where p is smallest prime > n.
3
0, 1, 2, 9, 4, 25, 6, 2401, 512, 81, 10, 121, 12, 28561, 2744, 225, 16, 289, 18, 130321, 8000, 441, 22, 148035889, 7962624, 390625, 17576, 729, 28, 841, 30, 887503681, 33554432, 1185921, 39304, 1225, 36, 1874161, 54872, 1521, 40, 1681, 42, 3418801
OFFSET
0,3
LINKS
MATHEMATICA
Table[n^(NextPrime[n]-n), {n, 0, 50}] (* Harvey P. Dale, Jun 20 2013 *)
CROSSREFS
Sequence in context: A213821 A022157 A065599 * A328618 A318680 A171560
KEYWORD
nonn
AUTHOR
EXTENSIONS
Definition corrected by Andrew Weimholt, Dec 08 2009
STATUS
approved