A165156 n^(2*n-1)-(2*n-1)^n.

0, -1, 118, 13983, 1894076, 361025495, 96826261890, 35181809198207, 16677063111790072, 9999993868933742199, 7400249593980659558990, 6624737245034612579099807, 7056410013376700546645974068

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Sep 05 2009

Keywords

• sign

Crossrefs

Cf. A085524, A085528

Programs

Mathematica

p=1;lst={};Do[AppendTo[lst,n^p-p^n];p=p+2,{n,4!}];lst
Table[n^(2n-1)-(2n-1)^n,{n,20}] (* Harvey P. Dale, Aug 10 2023 *)

Formula

a(n) = A085524(n)-A085528(n-1).

Extensions

Definition corrected by R. J. Mathar, Sep 06 2009