login
A259654
a(n) = prime(n)^prime(n) - prime(n)^n.
0
2, 18, 3000, 821142, 285311509560, 302875101765444, 827240261885926425504, 1978419655660296605560938, 20880467999847912032553880249104, 2567686153161211134561828214310308893183268, 17069174130723235958610643029033906279148329600
OFFSET
1,1
FORMULA
a(n) = A051674(n) - A062457(n).
MATHEMATICA
Table[Prime[n]^Prime[n] - Prime[n]^n, {n, 1, 10}]
#[[1]]^#[[1]]-#[[1]]^#[[2]]&/@Table[{Prime[n], n}, {n, 15}] (* Harvey P. Dale, Nov 10 2016 *)
PROG
(Magma) [NthPrime(n)^NthPrime(n)-NthPrime(n)^n: n in [1..12]]; // Vincenzo Librandi, Jul 03 2015
(PARI) a(n, p=prime(n))=p^p - p^n \\ Charles R Greathouse IV, Jul 22 2016
CROSSREFS
Sequence in context: A333164 A076954 A206847 * A060598 A055687 A006262
KEYWORD
nonn,easy
AUTHOR
Ilya Gutkovskiy, Jul 02 2015
STATUS
approved