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 A367103 #16 Dec 16 2023 09:02:47 %S A367103 15,21,39,57,65,91,95,133 %N A367103 Composite numbers c such that pi(c) is the product of pi applied to the distinct prime factors of c. %C A367103 Prime numbers trivially satisfy this property and so are excluded. %e A367103 15 is a term since its distinct prime factors are 3,5 and pi(15) = pi(3)*pi(5). %t A367103 Select[Range[2,10000], ! PrimeQ[#] && Times @@ PrimePi[Transpose[FactorInteger[#]][[1]]] == PrimePi[#] &] %Y A367103 Cf. A000720, A002808, A027748, A156061, A235623. %K A367103 nonn,fini,full %O A367103 1,1 %A A367103 _Tanya Khovanova_, Nov 04 2023