|
%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
|
