|
%I #7 Sep 14 2016 16:28:38
%S 1,1,1,3,28,548,23497,2025376,332441006,99261645275,51855771584229,
%T 45831611047094063,66548532114514065109,154694628574223336043275,
%U 562570231315425833145985936,3135339167611386023605597989027,26285722428407050441178592406444359
%N Nearest integer to (Product((n - i)^(1 + log(1 + i)), {i, 1, n - 1})).
%t Table[Round[Product[(n-i)^(1+Log[1+i]),{i,1,n-1}]],{n,0,20}] (* _Harvey P. Dale_, Sep 14 2016 *)
%Y Cf. A062496.
%K nonn
%O 0,4
%A _Olivier Gérard_, Jun 23 2001
%E Corrected by and previous Mathematica program replaced by _Harvey P. Dale_, Sep 14 2016
|
