|
|
A144167
|
|
IntegerPart(PolyGamma(n,1)).
|
|
1
|
|
|
1, -2, 6, -24, 122, -726, 5060, -40400, 363240, -3630593, 39926622, -479060379, 6227402193, -87180957830, 1307694352218, -20922949679481, 355688785859223, -6402385922818921, 121645216453639396, -2432903168507861321
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
lst={}; Do[AppendTo[lst, IntegerPart[PolyGamma[n, 1]]], {n, 4^3}]; lst
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|