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 A096830 #8 Nov 16 2019 20:07:19
%S A096830 0,2,2,1,0,2,1,0,1,2,4,3,1,3,0,1,1,1,0,3,5,1,0,0,1,2,4,1,3,1,1,2,4,0,
%T A096830 2,0,2,5,2,5,2,4,4,5,3,3,1,5,3,3,0,3,4,1,3,2,1,1,1,1,1,3,2,2,2,0,3,2,
%U A096830 4,4,0,4,4,2,3,5,3,1,1,8,1,2,2,1,2,2,0,1,3,5,2,2,4,2,5,3,5,2,5,2,2,1,0,1,0
%N A096830 Number of primes in neighborhood with center=n! and radius = ceiling(log(n!)).
%F A096830 a(n) = A096509(n!) = A096509(A000142(n)).
%e A096830 n=8: 8!=40320; radius=11, a(8)=0 because there are no primes in the neighborhood.
%t A096830 {ta=Table[0, {1000}], u=1}; Do[s=Count[Table[PrimeQ[n!+i], {i, -Ceiling[Log[n! ]//N], Ceiling[Log[n! ]//N]}], True]; Print[{n, s}];ta[[u]]=s;u=u+1, {n, 1, 1000}];ta
%Y A096830 Cf. A096509-A096523, A000142.
%K A096830 nonn
%O A096830 1,2
%A A096830 _Labos Elemer_, Jul 14 2004