A094647 a(n) = n^(2n) - (2n)^n.

-1, 0, 513, 61440, 9665625, 2173796352, 678117659345, 281470681743360, 150094436937708753, 99999989760000000000, 81402748802521459701993, 79496847166870496697384960, 91733330190787463785195879433

Offset: 1

Author

Gregory S. Thoman (fealuinix(AT)yahoo.com), May 18 2004

Keywords

• easy
• sign

Examples

			a(3) = 513 because 3^(2*3) - (2*3)^3 = 3^6 - 6^3 = 513.
		

Crossrefs

Cf. A007925, A046065.

Programs

Mathematica

a[n_] := n^n(n^n - 2^n); Table[a[n], {n, 13}] (* Robert G. Wilson v, May 24 2004 *)

Extensions

More terms from Emeric Deutsch, Robert G. Wilson v and Pab Ter (pabrlos(AT)yahoo.com), May 24 2004