This site is supported by donations to The OEIS Foundation.

 Annual Appeal: Please make a donation to keep the OEIS running. In 2018 we replaced the server with a faster one, added 20000 new sequences, and reached 7000 citations (often saying "discovered thanks to the OEIS"). Other ways to donate

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A104166 Repdigit Smith numbers. 1
 4, 22, 666, 1111, 6666666, 4444444444, 44444444444444444444, 555555555555555555555555555, 55555555555555555555555555555555, 4444444444444444444444444444444444444444444444444444444 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS S. S. Gupta, Smith Numbers. MATHEMATICA d[n_]:=IntegerDigits[n]; tr[n_]:=Transpose[FactorInteger[n]]; a[n_]:=NestList[FromDigits[Flatten[d[{#, n}]]]&, n, 55]; t={}; Do[If[!PrimeQ[n]&&Total[d[n]]==Total[d@tr[n][[1]]*tr[n][[2]], 2], AppendTo[t, n]], {n, Drop[Union[Flatten[Table[a[k], {k, 9}]]], 1]}]; t (* Jayanta Basu, Jun 04 2013 *) CROSSREFS Cf. A006753. Sequence in context: A145504 A321604 A276124 * A273054 A065401 A053775 Adjacent sequences:  A104163 A104164 A104165 * A104167 A104168 A104169 KEYWORD base,nonn AUTHOR Shyam Sunder Gupta, Mar 10 2005 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified December 14 09:20 EST 2018. Contains 318091 sequences. (Running on oeis4.)