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 A167609 #15 Jan 24 2024 08:30:15 %S A167609 2,3,7,11,13,23,37,47,59,61,73,83,107,157,167,179,193,227,263,277,313, %T A167609 347,359,383,397,421,457,467,479,503,541,563,587,613,661,673,719,733, %U A167609 757,839,863,877,887,983,997,1019,1093,1153,1187,1201,1213,1237,1283 %N A167609 Primes which are not the sum of two consecutive nonprimes A141468. %C A167609 2, and primes p such that floor(p/2) or ceiling(p/2) is prime, but not both. - _Robert Israel_, Jan 23 2024 %H A167609 Robert Israel, <a href="/A167609/b167609.txt">Table of n, a(n) for n = 1..10000</a> %p A167609 filter:= proc(n) if n mod 4 = 1 %p A167609 then isprime(n) and isprime((n+1)/2) %p A167609 else isprime(n) and isprime((n-1)/2) %p A167609 fi end proc: %p A167609 2, 3, op(select(filter, [seq(i,i=7 .. 10000, 2)])); # _Robert Israel_, Jan 23 2024 %Y A167609 Cf. A000040, A005383, A005385, A060254, A079149, A141468. %K A167609 nonn %O A167609 1,1 %A A167609 _Juri-Stepan Gerasimov_, Nov 07 2009 %E A167609 Entries checked by _R. J. Mathar_, May 30 2010