A103829 Sum of even digits less than sum of odd digits.

0, 2, 4, 6, 8, 12, 14, 16, 18, 20, 21, 22, 24, 26, 28, 34, 36, 38, 40, 41, 42, 43, 44, 46, 48, 56, 58, 60, 61, 62, 63, 64, 65, 66, 68, 78, 80, 81, 82, 83, 84, 85, 86, 87, 88, 102, 104, 106, 108, 114, 116, 118, 120, 122, 124, 126, 128, 136, 138, 140, 141, 142, 144, 146

Offset: 1

Author

Zak Seidov, Feb 17 2005

Keywords

• nonn
• base

Comments

0 is assumed as even digit: A005843, A004275, A007928. Sum of even digits equals sum of odd digits A036301.

Crossrefs

Cf. A005843, A004275, A007928, A036301.

Programs

Mathematica

Select[Range[300], Plus@@Select[IntegerDigits[ # ], OddQ]