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 A165144 #16 Oct 05 2024 14:51:59
%S A165144 1,5,7,22,15,33,23,49,88,35,114,79,48,100,148,189,57,201,139,78,230,
%T A165144 158,269,370,192,102,215,112,211,803,259,390,150,666,147,430,471,317,
%U A165144 485,506,152,869,168,364,184,1144,1213,404,206,433,613,217,1134,702,720,712
%N A165144 Number of semiprimes between two primes squared.
%F A165144 a(n) = A217019(n) - 1. - _Flávio V. Fernandes_, Nov 19 2020
%p A165144 A165144 := proc(n) a := 0 ; for k from ithprime(n)^2+1 to ithprime(n+1)^2-1 do if numtheory[bigomega](k) = 2 then a := a+1 ; fi ; end do ; a ; end proc: seq(A165144(n),n=1..80) ; # _R. J. Mathar_, Jan 30 2010
%t A165144 Table[Count[Range[Prime[p]^2+1,Prime[p+1]^2-1],_?(PrimeOmega[#]==2&)],{p,60}] (* _Harvey P. Dale_, Oct 05 2024 *)
%Y A165144 Cf. A001248 (primes squared), A001358 (semiprimes), A217019.
%K A165144 nonn
%O A165144 1,2
%A A165144 _Giovanni Teofilatto_, Sep 05 2009
%E A165144 a(7) corrected and terms beyond a(7) added by _R. J. Mathar_, Jan 30 2010