cp's OEIS Frontend

A324694 Lexicographically earliest sequence of positive integers divisible by prime(m) for some m not already in the sequence.

%I A324694 #9 Mar 11 2019 09:36:40
%S A324694 2,4,5,6,8,10,12,14,15,16,17,18,20,22,23,24,25,26,28,30,31,32,34,35,
%T A324694 36,38,40,41,42,44,45,46,48,50,51,52,54,55,56,58,60,62,64,65,66,67,68,
%U A324694 69,70,72,73,74,75,76,78,80,82,84,85,86,88,90,92,93,94,95
%N A324694 Lexicographically earliest sequence of positive integers divisible by prime(m) for some m not already in the sequence.
%C A324694 A self-describing sequence, similar to A304360.
%C A324694 A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.
%e A324694 The sequence of terms together with their prime indices begins:
%e A324694    2: {1}
%e A324694    4: {1,1}
%e A324694    5: {3}
%e A324694    6: {1,2}
%e A324694    8: {1,1,1}
%e A324694   10: {1,3}
%e A324694   12: {1,1,2}
%e A324694   14: {1,4}
%e A324694   15: {2,3}
%e A324694   16: {1,1,1,1}
%e A324694   17: {7}
%e A324694   18: {1,2,2}
%e A324694   20: {1,1,3}
%e A324694   22: {1,5}
%e A324694   23: {9}
%e A324694   24: {1,1,1,2}
%e A324694   25: {3,3}
%e A324694   26: {1,6}
%e A324694   28: {1,1,4}
%e A324694   30: {1,2,3}
%t A324694 aQ[n_]:=!And@@Cases[If[n==1,{},FactorInteger[n]],{p_,k_}:>aQ[PrimePi[p]]];
%t A324694 Select[Range[100],aQ]
%Y A324694 Complement of A324695.
%Y A324694 Cf. A000002, A000720, A001222, A001462, A007097, A055396, A061395, A079000, A079254, A109298, A112798, A276625, A277098, A304360.
%Y A324694 Cf. A324696, A324697, A324698, A324699, A324700, A324701, A324702, A324703, A324704, A324705.
%K A324694 nonn
%O A324694 1,1
%A A324694 _Gus Wiseman_, Mar 10 2019