A179082 Even numbers having an even sum of digits in their decimal representation.

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

Author

Reinhard Zumkeller, Jun 28 2010

Keywords

• base
• nonn
• easy

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.

Links

• R. Zumkeller, Table of n, a(n) for n = 1..1000
• Index entries for 10-automatic sequences.
• Index entries for Colombian or self numbers and related sequences

Programs

Mathematica

Select[Range[0,250,2],EvenQ[Total[IntegerDigits[#]]]&] (* Harvey P. Dale, Mar 19 2012 *)