|
|
A061814
|
|
Multiples of 4 containing only even digits.
|
|
2
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
EXAMPLE
|
244 is a term 244 = 4*61
|
|
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 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|