A050218 - OEIS

A050218

Sums of digits of Smith numbers A006753.

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

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Eric Weisstein's World of Mathematics, Smith Number.

Wikipedia, Smith number.

FORMULA

a(n) = A007953(A006753(n)).

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: A378032 A092322 A341678 * A165996 A266008 A284628

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

Note: This service is not intended for secure transactions such as banking, social media, email, or purchasing. Use at your own risk. We assume no liability whatsoever for broken pages.

Pfad - The Proxy pFad of © 2024 Garber Painting. All rights reserved.