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 A120633 #6 Oct 01 2019 15:58:41
%S A120633 1,1,3,2,7,7,12,12,13,22,19,25,31,31,33,37,45,44,51,56,55,61,63,66,75,
%T A120633 80,81,87,88,82,101,103,111,105,121,120,124,132,134,140,148,142,158,
%U A120633 158,164,156,165,182,188,188,189,199,193,205,210
%N A120633 Number of composite numbers bounded inclusively between p(n+1) and 2*p(n) where p(x) is prime(x).
%F A120633 a(n) = A062234(n) - A070046(n) + 1 = A120632(n) - A040976(n+1).
%t A120633 Table[Count[Range[Prime[n+1],2Prime[n]],_?CompositeQ],{n,60}] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Oct 01 2019 *)
%K A120633 nonn
%O A120633 1,3
%A A120633 _Lekraj Beedassy_, Jun 21 2006
%E A120633 Definition clarified by _Harvey P. Dale_, Oct 01 2019