Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A179082
Even numbers having an even sum of digits in their decimal representation.
12
0, 2, 4, 6, 8, 20, 22, 24, 26, 28, 40, 42, 44, 46, 48, 60, 62, 64, 66, 68, 80, 82, 84, 86, 88, 110, 112, 114, 116, 118, 130, 132, 134, 136, 138, 150, 152, 154, 156, 158, 170, 172, 174, 176, 178, 190, 192, 194, 196, 198, 200, 202, 204, 206, 208, 220, 222, 224, 226
OFFSET
1,2
COMMENTS
a(n) = A014263(n) for n <= 25;
intersection of A005843 and A054683: A059841(a(n))*(1-A179081(a(n)))=1;
complement of A179083 with respect to A005843;
complement of A179084 with respect to A054683;
a(n) mod 2 = 0 and A007953(a(n)) mod 2 = 0.
MATHEMATICA
Select[Range[0, 250, 2], EvenQ[Total[IntegerDigits[#]]]&] (* Harvey P. Dale, Mar 19 2012 *)
CROSSREFS
Sequence in context: A249278 A273892 A352546 * A341869 A194376 A062897
KEYWORD
base,nonn,easy
AUTHOR
Reinhard Zumkeller, Jun 28 2010
STATUS
approved