A259654 a(n) = prime(n)^prime(n) - prime(n)^n.

2, 18, 3000, 821142, 285311509560, 302875101765444, 827240261885926425504, 1978419655660296605560938, 20880467999847912032553880249104, 2567686153161211134561828214310308893183268, 17069174130723235958610643029033906279148329600

Offset

1,1

Links

Table of n, a(n) for n=1..11.

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

Cf. A062481, A051674.

Sequence in context: A333164 A076954 A206847 * A060598 A055687 A006262

Adjacent sequences: A259651 A259652 A259653 * A259655 A259656 A259657

Keyword

nonn,easy

Author

Ilya Gutkovskiy, Jul 02 2015

Status

approved