|
%I #12 Jan 05 2021 21:35:10
%S 4,8,9,16,24,25,27,32,40,48,49,54,56,64,72,80,81,88,96,104,108,112,
%T 121,125,128,135,136,144,152,160,162,169,176,184,189,192,200,208,216,
%U 224,232,240,243,248,250,256,272,288,289,296,297,304,320,324,328,336
%N Non-products of distinct primes or squarefree semiprimes.
%C Differs from A293243 and A212164 in having 1080, with prime indices {1,1,1,2,2,2,3} and factorization into distinct squarefree numbers 2*3*6*30.
%e The sequence of terms together with their prime indices begins:
%e 4: {1,1} 80: {1,1,1,1,3}
%e 8: {1,1,1} 81: {2,2,2,2}
%e 9: {2,2} 88: {1,1,1,5}
%e 16: {1,1,1,1} 96: {1,1,1,1,1,2}
%e 24: {1,1,1,2} 104: {1,1,1,6}
%e 25: {3,3} 108: {1,1,2,2,2}
%e 27: {2,2,2} 112: {1,1,1,1,4}
%e 32: {1,1,1,1,1} 121: {5,5}
%e 40: {1,1,1,3} 125: {3,3,3}
%e 48: {1,1,1,1,2} 128: {1,1,1,1,1,1,1}
%e 49: {4,4} 135: {2,2,2,3}
%e 54: {1,2,2,2} 136: {1,1,1,7}
%e 56: {1,1,1,4} 144: {1,1,1,1,2,2}
%e 64: {1,1,1,1,1,1} 152: {1,1,1,8}
%e 72: {1,1,1,2,2} 160: {1,1,1,1,1,3}
%e For example, a complete list of strict factorizations of 72 is: (2*3*12), (2*4*9), (2*36), (3*4*6), (3*24), (4*18), (6*12), (8*9), (72); but since none of these consists of only primes or squarefree semiprimes, 72 is in the sequence.
%t sqps[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[sqps[n/d],Min@@#>d&]],{d,Select[Divisors[n],PrimeQ[#]||SquareFreeQ[#]&&PrimeOmega[#]==2&]}]];
%t Select[Range[100],sqps[#]=={}&]
%Y A013929 allows only primes.
%Y A320894 does not allow primes (but omega is assumed even).
%Y A339741 is the complement.
%Y A339742 has zeros at these positions.
%Y A339840 allows squares of primes.
%Y A001358 lists semiprimes, with squarefree case A006881.
%Y A002100 counts partitions into squarefree semiprimes.
%Y A320663 counts non-isomorphic multiset partitions into singletons or pairs.
%Y A339841 have exactly one factorization into primes or semiprimes.
%Y The following count factorizations:
%Y - A001055 into all positive integers > 1.
%Y - A050326 into distinct squarefree numbers.
%Y - A320655 into semiprimes.
%Y - A320656 into squarefree semiprimes.
%Y - A320732 into primes or semiprimes.
%Y - A322353 into distinct semiprimes.
%Y - A339661 into distinct squarefree semiprimes.
%Y - A339839 into distinct primes or semiprimes.
%Y The following count vertex-degree partitions and give their Heinz numbers:
%Y - A058696 counts partitions of 2n (A300061).
%Y - A000070 counts non-multigraphical partitions of 2n (A339620).
%Y - A339655 counts non-loop-graphical partitions of 2n (A339657).
%Y - A339617 counts non-graphical partitions of 2n (A339618).
%Y - A321728 is conjectured to count non-half-loop-graphical partitions of n.
%Y The following count partitions/factorizations of even length and give their Heinz numbers:
%Y - A027187/A339846 counts all of even length (A028260).
%Y - A096373/A339737 cannot be partitioned into strict pairs (A320891).
%Y - A338915/A339662 cannot be partitioned into distinct pairs (A320892).
%Y - A339559/A339564 cannot be partitioned into distinct strict pairs (A320894).
%Y Cf. A001221, A005117, A050320, A320893, A320911, A320912, A320922, A320924, A339113, A339561.
%K nonn
%O 1,1
%A _Gus Wiseman_, Dec 20 2020
|
