Thanks to everyone who made a donation during our annual appeal! To see the list of donors, or make a donation, see the OEIS Foundation home page.
Table of n, a(n) for n=1..52.
Select[Range, DigitCount[#, 6, 0]==DigitCount[#, 6, 3]>0&] (* Harvey P. Dale, Aug 23 2018 *)
Sequence in context: A106521 A070686 A043118 * A043898 A231086 A285527
Adjacent sequences: A039292 A039293 A039294 * A039296 A039297 A039298