login
This site is supported by donations to The OEIS Foundation.
Logo

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A144167 IntegerPart[PolyGamma[n,1]]. 0
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; internal format)
OFFSET

1,2

MATHEMATICA

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

CROSSREFS

Sequence in context: A024923 A037992 A114779 * A104983 A144251 A201158

Adjacent sequences:  A144164 A144165 A144166 * A144168 A144169 A144170

KEYWORD

sign

AUTHOR

Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 12 2008

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified February 15 18:15 EST 2012. Contains 205835 sequences.