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,2

Comments

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

Links

Table of n, a(n) for n=1..64.

Mathematica

Select[Range[300], Plus@@Select[IntegerDigits[ # ], OddQ]<Plus@@Select[IntegerDigits[ # ], EvenQ]&]

Crossrefs

Cf. A005843, A004275, A007928, A036301.

Sequence in context: A323505 A350355 A172311 * A164530 A058817 A328593

Adjacent sequences: A103826 A103827 A103828 * A103830 A103831 A103832

Keyword

nonn,base

Author

Zak Seidov, Feb 17 2005

Status

approved