1,3

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Select[Range[0, 100], DigitCount[#, 12, 8] == DigitCount[#, 12, 10] &] (* Vincenzo Librandi, Oct 21 2012 *)

Sequence in context: A132430 A049537 A039171 * A039208 A039119 A140297

Adjacent sequences: A039267 A039268 A039269 * A039271 A039272 A039273

nonn,base,easy

Olivier Gérard

An incorrect g.f. was deleted by N. J. A. Sloane, Sep 13 2009

approved