%I #7 Dec 15 2017 17:36:40
%S 0,2,29,354,5029,83596,1602540,34887239,851249820,23025850929,
%T 684147506232,22155677294049,776859310044893,29325223059723664,
%U 1185838637907315360,51145234580810622639,2343748148716928136491
%N a(n) = floor(n^n*log(n)).
%t Table[Floor[n^n Log[n]],{n,20}] (* _Harvey P. Dale_, Mar 04 2013 *)
%K easy,nonn
%O 1,2
%A _Jason Earls_, Jun 19 2004