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 A000974 #14 Dec 25 2016 00:25:10 %S A000974 1,4,9,11,11,16,16,18,20,23,16,29,16,25,27,23,22,25,35,29,26,25,27,27, %T A000974 27,33,28,44,35,21,29,35,38,33,39,37,34,35,31,31,28,41,37,32,44,35,37, %U A000974 41,44,33,37,32,47,39,43,47,33,37,48,41,37,48,34,35,47,36,29,36,46,44,43,38,48 %N A000974 Conjecturally the number of even integers the sum of two primes in exactly n ways. %H A000974 T. D. Noe, <a href="/A000974/b000974.txt">Table of n, a(n) for n = 0..5000</a> %t A000974 f[n_] := Length[ Select[2n - Prime[ Range[ PrimePi[n]]], PrimeQ]]; a = Table[0, {75}]; Do[c = f[n]; If[c < 75, a[[c + 1]]++ ], {n, 5000}]; a (* _Robert G. Wilson v_, using Paul Abbott's coding in A002375, Apr 07 2005 *) %Y A000974 Cf. A000954, A001172, A002375. %K A000974 nonn %O A000974 0,2 %A A000974 _Bill Gosper_