cp's OEIS Frontend

A317091 Positive integers whose prime multiplicities are weakly increasing and span an initial interval of positive integers.

%I A317091 #9 Nov 10 2021 07:07:28
%S A317091 2,3,5,6,7,10,11,13,14,15,17,18,19,21,22,23,26,29,30,31,33,34,35,37,
%T A317091 38,39,41,42,43,46,47,50,51,53,55,57,58,59,61,62,65,66,67,69,70,71,73,
%U A317091 74,75,77,78,79,82,83,85,86,87,89,91,93,94,95,97,98,101,102
%N A317091 Positive integers whose prime multiplicities are weakly increasing and span an initial interval of positive integers.
%H A317091 Amiram Eldar, <a href="/A317091/b317091.txt">Table of n, a(n) for n = 1..10000</a>
%t A317091 normalQ[m_]:=Union[m]==Range[Max[m]];
%t A317091 Select[Range[2,150],And[normalQ[FactorInteger[#][[All,2]]],OrderedQ[FactorInteger[#][[All,2]]]]&]
%Y A317091 Cf. A001222, A007916, A055932, A056239, A112798, A124010, A133808, A304678.
%Y A317091 Cf. A317087, A317088, A317089, A317090, A317092.
%K A317091 nonn
%O A317091 1,1
%A A317091 _Gus Wiseman_, Jul 21 2018