A061814 Multiples of 4 containing only even digits.
0, 4, 8, 20, 24, 28, 40, 44, 48, 60, 64, 68, 80, 84, 88, 200, 204, 208, 220, 224, 228, 240, 244, 248, 260, 264, 268, 280, 284, 288, 400, 404, 408, 420, 424, 428, 440, 444, 448, 460, 464, 468, 480, 484, 488, 600, 604, 608, 620, 624, 628, 640, 644, 648, 660, 664, 668, 680, 684, 688
Offset: 0
Examples
244 is a term 244 = 4*61
Links
- Harvey P. Dale, Table of n, a(n) for n = 0..1000
- Index entries for 10-automatic sequences.
Crossrefs
Cf. A014263.
Programs
-
Mathematica
Select[4*Range[0,200],AllTrue[IntegerDigits[#],EvenQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Jul 02 2016 *)
-
PARI
is(n)=n%4==0 && #setintersect(Set(digits(n)), [1,3,5,7,9])==0 \\ Charles R Greathouse IV, Feb 15 2017