This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A216407 #39 Oct 12 2013 21:53:16
%S A216407 45,44,43,42,41,40,39,38,37,36,44,44,42,41,40,39,38,37,36,35,43,42,43,
%T A216407 40,39,38,37,36,35,34,42,41,40,42,38,37,36,35,34,33,41,40,39,38,41,36,
%U A216407 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
%N A216407 Sum of decimal digits not appearing in n.
%H A216407 Reinhard Zumkeller, <a href="/A216407/b216407.txt">Table of n, a(n) for n = 0..10000</a>
%H A216407 <a href="/index/Coi#Colombian">Index entries for Colombian or self numbers and related sequences</a>
%F A216407 a(n) = 45 - A217928(n).
%F A216407 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
%t A216407 Total[Complement[Range[0,9],IntegerDigits[#]]]&/@Range[0,100] (* _Harvey P. Dale_, Aug 13 2013 *)
%o A216407 (PARI) { a(n) = local( d = vecsort( eval(Vec(Str(n))),,8) ); 45 - sum(i=1,#d,d[i]) }
%o A216407 (Haskell)
%o A216407 a216407 = (45 -) . a217928 -- _Reinhard Zumkeller_, Jul 09 2013
%K A216407 base,easy,nonn
%O A216407 0,1
%A A216407 Xenia Sheinerman, Oct 15 2012