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

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A060744 Numbers n such that n | p(n)*q(n), where p() is the unrestricted partition function (A000041) and q is the distinct partition function (A000009). 0
1, 2, 3, 10, 16, 51, 65, 124, 138, 158, 160, 180, 342, 366, 406, 522, 524, 544, 580, 648, 693, 850, 896, 900, 1248, 1436, 1488, 1662, 1896, 2356, 2816, 3360, 3853, 3904, 4416, 4434, 4484, 5273, 5464, 5648, 5649, 6312, 6492, 6840, 7168, 7616, 8085, 8512 (list; graph; refs; listen; history; internal format)
OFFSET

1,2

MATHEMATICA

Do[ p = PartitionsP[ n ]; q = PartitionsQ[ n ]; If[ Mod[ p*q, n ] == 0, Print[ n ] ], {n, 1, 11050} ]

CROSSREFS

Sequence in context: A106672 A135061 A069156 * A192798 A143609 A066915

Adjacent sequences:  A060741 A060742 A060743 * A060745 A060746 A060747

KEYWORD

nonn

AUTHOR

Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 23 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 14:46 EST 2012. Contains 206047 sequences.