|
%I #4 May 13 2019 08:50:13
%S 0,0,0,0,0,0,0,-2,6,-21,77,-308,1326,-6159,30691,-163262,923364,
%T -5532187,34999420,-233141556,1631008138,-11955337672,91626679088,
%U -732828332694,6105747679463,-52908981009168,476130261273006
%N IntegerPart[PolyGamma[n,3]].
%t lst={};Do[AppendTo[lst,IntegerPart[PolyGamma[n,3]]],{n,4^3}];lst
%t IntegerPart[PolyGamma[Range[30],3]] (* _Harvey P. Dale_, May 13 2019 *)
%K sign
%O 0,8
%A _Vladimir Joseph Stephan Orlovsky_, Sep 12 2008
|
