A121026 Multiples of 6 containing a 6 in their decimal representation.
6, 36, 60, 66, 96, 126, 156, 162, 168, 186, 216, 246, 264, 276, 306, 336, 360, 366, 396, 426, 456, 462, 468, 486, 516, 546, 564, 576, 600, 606, 612, 618, 624, 630, 636, 642, 648, 654, 660, 666, 672, 678, 684, 690, 696, 726, 756, 762, 768, 786, 816, 846, 864
Offset: 1
Crossrefs
Programs
-
Mathematica
Select[6*Range[200],DigitCount[#,10,6]>0&] (* Harvey P. Dale, Jan 07 2021 *)
-
PARI
is(n)=n%6==0 && setsearch(Set(digits(n)), 6) \\ Charles R Greathouse IV, Feb 12 2017
Formula
a(n) ~ 6n. - Charles R Greathouse IV, Feb 12 2017
Extensions
Corrected by T. D. Noe, Oct 25 2006
Typo in comment fixed by Reinhard Zumkeller, May 01 2011