This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A096841 Numbers n such that sum of divisors of these numbers gives a decimal repdigit. 6
 1, 2, 3, 4, 5, 7, 43, 146, 365, 438, 443, 803, 887, 2221, 4442, 6663, 8887, 87876, 88183, 153837, 250244, 285597, 292860, 296294, 302877, 307674, 344268, 351612, 380718, 403398, 423260, 441821, 444443, 550238, 579038, 584438, 588974, 593163, 600363 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS EXAMPLE n=43:sigma[43]=44; regular solutions:repdigit-1=prime. MATHEMATICA rd[x_] := Length[Union[IntegerDigits[x]]] Do[s = rd[DivisorSigma[1, n]]; s1 = DivisorSigma[1, n]; If[Equal[s, 1], Print[{n, s1}]; ta[[u]] = n; u = u + 1], {n, 1, 1000000}]; ta; DivisorSigma[1, ta] CROSSREFS Cf. A096503-A096508, A096841-A096846, A000203. Sequence in context: A135709 A028980 A183108 * A029963 A028986 A063948 Adjacent sequences:  A096838 A096839 A096840 * A096842 A096843 A096844 KEYWORD base,nonn AUTHOR Labos E. (labos(AT)ana.sote.hu), Jul 15 2004 STATUS approved

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 .