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 A225518 #6 May 09 2013 18:43:54 %S A225518 0,0,0,0,0,0,0,0,0,1,1,1,0,2,2,1,1,2,1,1,1,2,2,3,0,1,3,1,2,3,2,3,1,2, %T A225518 3,2,1,2,3,1,1,3,2,3,1,2,3,3,2,4,2,2,2,4,2,3,3,2,4,3,2,4,3,3,4,2,2,3, %U A225518 2,2,4,3,2,5,3,2,4,5,3,4,2,4,5,4,2,4,3 %N A225518 Number of ways to express 2n+1 as p + 8*q, with p and q primes. %C A225518 This is related to the conjecture given in A223174 and A223175. %C A225518 For n > 8, a(12) = a(24) = 0 because A223174(12)= A223174(24)= 0. %H A225518 Michel Lagneau, <a href="/A225518/b225518.txt">Table of n, a(n) for n = 0..10000</a> %e A225518 a(14) = 2 because 29 = 5+8*3 = 13+8*2 with 2 decompositions. %e A225518 a(23) = 3 because 47 = 7+8*5 = 23+8*3 = 31+8*2 with 3 decompositions. %t A225518 a[n_] := (ways = 0; Do[p = 2k + 1; q = (n-k)/4; If[PrimeQ[p] && PrimeQ[q], ways++], {k, 1, n}]; ways); Table[a[n], {n, 0, 90}] %Y A225518 Cf. A219254, A223174, A223175. %K A225518 nonn %O A225518 0,14 %A A225518 _Michel Lagneau_, May 09 2013