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 A075410 #7 Sep 02 2017 11:01:19 %S A075410 0,0,3,2,5,2,5,8,7,4,19,16,29,68,97,16,109,86,19,158,17,172,41,16,529, %T A075410 106,263,212,163,302,593,302,607,262,311,428,227,106,1271,8,229,386, %U A075410 1489,32,47,1996,1097,2566,41,632,1913,458,149,1244,2837,362,3317,908 %N A075410 a(n) is the smallest m such that n!!-m and n!!+m are both primes. %C A075410 For n = 5,7,10,11,22,41,67,76,91,96,163,245,299,341, n!! is an interprime, the average of two consecutive primes, see A075275. See also n^n and n! as average of two primes in A075468 and A075409. %e A075410 a(4) = 3 because 4!! = 8 and 8 -/+ 3 = 5 and 11 are primes with smallest equal distances from 4!! %t A075410 smbp[n_]:=Module[{m=0,n2=n!!},While[Total[Boole[PrimeQ[n2+{m,-m}]]] != 2,m++];m]; Array[smbp,60,2] (* _Harvey P. Dale_, Sep 02 2017 *) %Y A075410 Cf. A075275, A075468 and A075409. %K A075410 nonn %O A075410 2,3 %A A075410 _Zak Seidov_, Sep 18 2002 %E A075410 More terms from _David Wasserman_, Jan 17 2005