%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