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 A114442 #13 Aug 06 2017 02:55:07
%S A114442 211,23,2,3,13,5,127,7,17,281,19,137,277,139,59,881,79,179,11299,199,
%T A114442 1559,2797,1399,599,12799,997,1979,86861,1999,13799,25999,13999,49999,
%U A114442 172999,70999,19979,1199929,39799,137999,277999,139999,59999,1299979
%N A114442 Least prime whose absolute difference between the sum of its even decimal digits and the sum of its odd decimal digits is n.
%C A114442 When a(n) is not A067180(n) and n!=0 (mod 3): 1, 11, 13, 17, 20, 22, 26, 29, 31, 32, 34, 35, 37, 38, 40, 44, 47, 49, 53, 55, 56, 58, 59, 61, 62, 65, 67, 70, 71, 73, 74, 76, 77, 80, 82, 83, ....
%e A114442 a(0)=211 since 211 is the least prime which meets the criterion; i.e., |2 - (1+1)| = 0.
%t A114442 f[n_] := Block[{id = IntegerDigits@Prime@n}, Abs[(Plus @@ id) - 2Plus @@ Select[id, OddQ]]]; t = Table[0, {50}]; Do[ a = f[n]; If[ t[[a + 1]] == 0, t[[a + 1]] = n], {n, 100020}]; t
%Y A114442 Cf. A067180, A111309.
%K A114442 nonn,base
%O A114442 0,1
%A A114442 _Zak Seidov_ and _Robert G. Wilson v_, Feb 04 2006