%I #4 Sep 19 2023 13:43:10

%S 0,0,0,0,2,-6,20,-80,360,-1793,9822,-58779,381393,-2666630,19984218,

%T -159791481,1357763223,-12217090921,116044807396,-1160331221321,

%U 12182660845677,-134003283550602,1540991901127780,-18491536121716991

%N IntegerPart[PolyGamma[n,2]].

%t lst={};Do[AppendTo[lst,IntegerPart[PolyGamma[n,2]]],{n,4^3}];lst

%t IntegerPart[PolyGamma[Range[0,30],2]] (* _Harvey P. Dale_, Sep 19 2023 *)

%K sign

%O 0,5

%A _Vladimir Joseph Stephan Orlovsky_, Sep 12 2008