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 A368089 #52 Jan 21 2024 15:14:52 %S A368089 20,28,40,44,45,50,52,56,63,68,75,76,80,84,88,92,98,99,100,104,112, %T A368089 116,117,124,126,132,135,136,140,147,148,152,153,156,160,164,168,171, %U A368089 172,175,176,184,188,189,196,198,200,204,207,208,212,220,224,225,228,232 %N A368089 Numbers k neither squarefree nor prime powers whose squarefree kernel is not a primorial. %C A368089 Numbers k such that Omega(k) > omega(k) > 1 such that squarefree kernel rad(k) is not in A002110, where Omega = A001222, omega = A001221, and rad(k) = A007947(k). %C A368089 Contains numbers k in A126706 that are not of the form m*P(n), where P(n) = A002110(n), rad(m) | P(n), m > 1, n > 1. %H A368089 Michael De Vlieger, <a href="/A368089/b368089.txt">Table of n, a(n) for n = 1..10000</a> %F A368089 This sequence is { A126706 \ A055932 } = { A126706 \ A367268 }. %t A368089 Select[Select[Range[240], Nor[SquareFreeQ[#], PrimePowerQ[#]] &], Nand[EvenQ[#], Union@ Differences@ PrimePi[FactorInteger[#][[All, 1]]] == {1}] &] %Y A368089 Cf. A001221, A001222, A002110, A007947, A055932, A126706, A367268. %K A368089 nonn %O A368089 1,1 %A A368089 _Michael De Vlieger_, Jan 20 2024