|
%I #5 Aug 10 2023 18:03:34
%S 0,-1,118,13983,1894076,361025495,96826261890,35181809198207,
%T 16677063111790072,9999993868933742199,7400249593980659558990,
%U 6624737245034612579099807,7056410013376700546645974068
%N n^(2*n-1)-(2*n-1)^n.
%F a(n) = A085524(n)-A085528(n-1).
%t p=1;lst={};Do[AppendTo[lst,n^p-p^n];p=p+2,{n,4!}];lst
%t Table[n^(2n-1)-(2n-1)^n,{n,20}] (* _Harvey P. Dale_, Aug 10 2023 *)
%Y Cf. A085524, A085528
%K sign
%O 1,3
%A _Vladimir Joseph Stephan Orlovsky_, Sep 05 2009
%E Definition corrected by _R. J. Mathar_, Sep 06 2009
|
