A153217 - OEIS

%I #5 Jan 27 2014 11:37:02

%S -1,-3,7,513,13983,357857,9546255,272475249,8375575711,277269756129,

%T 9862141508151,375700268413577,15277275236695743,660913009555809345,

%U 30322968902771794975,1471145239418922932193,75269422312346702251455

%N a(n)=n^(n+3)-(n+3)^n.

%t a[n_]:=n^(n+3)-(n+3)^n;lst={};Do[AppendTo[lst,a[n]],{n,0,4!}];lst

%t Table[n^(n+3)-(n+3)^n,{n,0,20}] (* _Harvey P. Dale_, Jan 27 2014 *)

%Y Cf. A046065

%K sign

%O 0,2

%A _Vladimir Joseph Stephan Orlovsky_, Dec 20 2008

%E Minor edits from _Harry J. Smith_, Dec 23 2008