OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
MATHEMATICA
Select[Range[0, 200], Divisible[#, 6]||DigitCount[#, 10, 6]>0&] (* Harvey P. Dale, Jun 04 2011 *)
Select[Range[0, 300], Mod[#, 6] == 0||MemberQ[IntegerDigits[#], 6] &] (* Vincenzo Librandi, Jul 19 2016 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, Mar 24 2004
EXTENSIONS
More terms from Mohammed Bouayoun (bouyao(AT)wanadoo.fr), Mar 25 2004
Corrected by Harvey P. Dale, Jun 04 2011
STATUS
approved