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

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A058858 Numbers n such that n divides the sum of the first n unique partition numbers (A000009). 0
1, 2, 8, 18, 42, 66, 69, 84, 1138, 1935, 3828, 9464 (list; graph; refs; listen; history; internal format)
OFFSET

1,2

MATHEMATICA

s = 0; Do[ s = s + PartitionsQ[ n ]; If[ Mod[ s, n ] == 0, Print[ n ] ], { n, 1, 8000} ]

CROSSREFS

Sequence in context: A198014 A188577 A064705 * A073307 A064009 A201348

Adjacent sequences:  A058855 A058856 A058857 * A058859 A058860 A058861

KEYWORD

nonn

AUTHOR

Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 05 2001

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 17 04:26 EST 2012. Contains 205978 sequences.