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 A369361 #13 Jan 24 2024 16:43:45
%S A369361 3,5,7,9,10,11,13,14,15,17,18,19,20,21,22,23,25,26,27,28,29,31,33,34,
%T A369361 35,37,38,39,40,41,42,43,44,45,46,47,49,50,51,52,53,54,55,56,57,58,59,
%U A369361 61,62,63,65,66,67,68,69,70,71,73,74,75,76,77,78,79,80,81,82
%N A369361 Numbers that are not products of primorials.
%C A369361 Differs from A080259 in that this sequence includes 18.
%C A369361 Differs from A093373 in that this sequence does not include 30.
%C A369361 Primorials P(n) = A002110(n) are not in this sequence.
%C A369361 Does not contain powers of 2.
%C A369361 Contains odd numbers k > 1.
%C A369361 Numbers that are not the first with their prime signature, complement of A025487. - _Peter Munn_, Jan 24 2024
%H A369361 Michael De Vlieger, <a href="/A369361/b369361.txt">Table of n, a(n) for n = 1..10000</a>
%F A369361 {a(n)} = A000027 \ A025487.
%F A369361 Union of A080259 and A056808, superset of both.
%F A369361 Superset of A005408 \ {1}.
%F A369361 {a(n)} = {k : A046523(k) < k}. - _Peter Munn_, Jan 24 2024
%t A369361 Select[Range[210], Nor[# == 1, IntegerQ@ Log2[#], And[EvenQ[#1], Union@ Differences@ PrimePi[#2[[All, 1]]] == {1}, AllTrue[Differences@ #2[[All, -1]], # <= 0 &]]] & @@ {#, FactorInteger[#]} &]
%Y A369361 Cf. A000079, A002110, A005408, A025487, A046523, A056808, A080259, A093373.
%K A369361 nonn,easy
%O A369361 1,1
%A A369361 _Michael De Vlieger_, Jan 21 2024