OFFSET
1,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[200], DigitCount[#, 12, 8] == DigitCount[#, 12, 0] &] (* Harvey P. Dale, Apr 24 2011 *)
PROG
(Magma) [n: n in [1..100] | Multiplicity(S, 0) eq Multiplicity(S, 8) where S is {*d: d in Intseq(n, 12)*}]; // Bruno Berselli, Oct 20 2012
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
EXTENSIONS
An incorrect g.f. was deleted by N. J. A. Sloane, Sep 13 2009
STATUS
approved