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

 

Logo


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 A262811

Adjacent sequences:  A050215 A050216 A050217 * A050219 A050220 A050221

KEYWORD

nonn,base,less

AUTHOR

Eric W. Weisstein

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified March 26 21:00 EDT 2017. Contains 284137 sequences.