A216407 Sum of decimal digits not appearing in n.

45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 44, 44, 42, 41, 40, 39, 38, 37, 36, 35, 43, 42, 43, 40, 39, 38, 37, 36, 35, 34, 42, 41, 40, 42, 38, 37, 36, 35, 34, 33, 41, 40, 39, 38, 41, 36, 35, 34, 33, 32, 40, 39, 38, 37, 36, 40, 34, 33, 32, 31, 39, 38, 37, 36, 35, 34, 39, 32, 31, 30, 38, 37, 36, 35, 34, 33, 32, 38, 30, 29, 37, 36, 35, 34, 33, 32, 31, 30, 37, 28, 36, 35, 34, 33, 32, 31, 30, 29, 28, 36, 44

Offset

0,1

Links

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

Index entries for Colombian or self numbers and related sequences

Formula

a(n) = 45 - A217928(n).

a(n) = 0 for almost all n. Average order is n^-0.045 where the exponent is log(0.9)/log(10). - Charles R Greathouse IV, Oct 15 2012

Mathematica

Total[Complement[Range[0, 9], IntegerDigits[#]]]&/@Range[0, 100] (* Harvey P. Dale, Aug 13 2013 *)

Prog

(PARI) { a(n) = local( d = vecsort( eval(Vec(Str(n))), , 8) ); 45 - sum(i=1, #d, d[i]) }
(Haskell)
a216407 = (45 -) . a217928  -- Reinhard Zumkeller, Jul 09 2013

Crossrefs

Sequence in context: A165248 A085518 A087083 * A137439 A199356 A199523

Adjacent sequences: A216404 A216405 A216406 * A216408 A216409 A216410

Keyword

base,easy,nonn

Author

Xenia Sheinerman, Oct 15 2012

Status

approved