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!)
 A050218 Sums of digits of Smith numbers A006753. 4
 4, 4, 9, 13, 13, 13, 4, 13, 4, 13, 13, 13, 13, 13, 18, 13, 13, 15, 13, 15, 13, 13, 13, 13, 18, 21, 15, 13, 15, 15, 18, 15, 15, 18, 15, 13, 17, 18, 15, 22, 15, 15, 15, 22, 13, 15, 13, 22, 22, 15, 4, 13, 13, 13, 13, 15, 17, 18, 13, 15, 15, 13, 13, 22, 17, 18, 21, 22, 13, 15 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS a(n) = A007953(A006753(n)). LINKS Reinhard Zumkeller, Table of n, a(n) for n = 1..10000 Eric Weisstein's World of Mathematics, Smith Number Eric Weisstein's World of Mathematics, Super-Poulet Number Wikipedia, Smith number MATHEMATICA d[n_]:=IntegerDigits[n]; tr[n_]:=Transpose[FactorInteger[n]]; t={}; Do[If[!PrimeQ[n]&&(x=Total[d[n]])==Total[d@tr[n][[1]]*tr[n][[2]], 2], AppendTo[t, x]], {n, 4, 1850}]; t (* Jayanta Basu, Jun 04 2013 *) CROSSREFS Cf. A006753, A050219, A050220. Cf. A202388, A050223. Sequence in context: A222045 A088190 A092322 * A165996 A266008 A284628 Adjacent sequences:  A050215 A050216 A050217 * A050219 A050220 A050221 KEYWORD nonn,base,less AUTHOR EXTENSIONS Offset corrected by Reinhard Zumkeller, Dec 19 2011 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:49 EST 2018. Contains 318095 sequences. (Running on oeis4.)