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

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A067313 Numbers n such that DivisorSigma[n,n]/n is an integer. 0
1, 10, 130, 135, 147, 150, 228, 250, 350, 364, 410, 444, 492, 876, 891, 945, 1014, 1308, 1372, 1550, 1690, 1950, 2050, 2210, 2373, 2565, 2850, 3045, 3050, 3250, 3375, 3876, 4108, 4185, 4905, 4995, 5050, 5070, 5145, 5330, 5439, 5481, 6150, 6250, 6321 (list; graph; refs; listen; history; internal format)
OFFSET

1,2

EXAMPLE

If n=10, then Sigma[10,10]=1+1024+9765625+10000000000=1009766650 is divisible by n=10.

MATHEMATICA

Do[s=DivisorSigma[n, n]; If[IntegerQ[s/n], Print[n]], {n, 1, 10000}]

CROSSREFS

Sequence in context: A184678 A007819 A054050 * A104130 A051607 A113386

Adjacent sequences:  A067310 A067311 A067312 * A067314 A067315 A067316

KEYWORD

nonn

AUTHOR

Labos E. (labos(AT)ana.sote.hu), Jan 14 2002

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 19:13 EST 2012. Contains 206085 sequences.