This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A341008 #19 Jul 18 2021 12:20:03 %S A341008 7,18,29,70,81,92,108,115,126,133,144,151,162,180,209,216,238,261,283, %T A341008 290,313,328,331,346,364,382,414,436,441,458,463,485,511,548,566,584, %U A341008 612,621,634,643,656,665,678,687,700,768,786,801,810,823,832,845,854,867,876,889,898 %N A341008 Numbers whose sum of even digits and sum of odd digits differ by 7. %H A341008 Carole Dubois, <a href="/A341008/b341008.txt">Table of n, a(n) for n = 1..5001</a> %t A341008 Select[Range[1000], Abs[Plus @@ Select[(d = IntegerDigits[#]), OddQ] - Plus @@ Select[d, EvenQ]] == 7 &] (* _Amiram Eldar_, Feb 02 2021 *) %o A341008 (Python) %o A341008 def ok(n): %o A341008 s = str(n) %o A341008 return abs(sum(map(int, s))-2*sum(int(d) for d in s if d in "2468")) == 7 %o A341008 print(list(filter(ok, range(900)))) # _Michael S. Branicky_, Jul 18 2021 %Y A341008 Cf. A036301 (sums are equal), A341002 to A341010 (sums differ by 1 to 9). %K A341008 base,nonn,less %O A341008 1,1 %A A341008 _Eric Angelini_ and _Carole Dubois_, Feb 02 2021