cp's OEIS Frontend

A096903 Least integer of each ordered prime signature (A055932) arranged by prime signature (each row starting with least integer of each prime signature, A025487).

%I A096903 #23 Feb 06 2020 20:54:21
%S A096903 1,2,4,6,8,12,18,16,24,54,30,32,36,48,162,60,90,150,64,72,108,96,486,
%T A096903 120,270,750,128,144,324,180,300,450,192,1458,210,216,240,810,3750,
%U A096903 256,288,972,360,540,600,1350,1500,2250,384,4374,420,630,1050,1470,432,648
%N A096903 Least integer of each ordered prime signature (A055932) arranged by prime signature (each row starting with least integer of each prime signature, A025487).
%C A096903 There are several other sequences closely related to a(n). A066099 and A108244 both list the associated exponents, while A108730 provides an elegant mapping to binary representations. - _Alford Arnold_, Mar 05 2006
%H A096903 Michael De Vlieger, <a href="/A096903/b096903.txt">Table of n, a(n) for n = 0..14264</a> (rows 0 <= n <= 487 = A098719(9) - 1.)
%H A096903 OEIS Wiki, <a href="http://oeis.org/wiki/Orderings_of_ordered_prime_signatures">Orderings of ordered prime signatures</a>
%e A096903 Sequence begins
%e A096903 1,
%e A096903 2,
%e A096903 4,
%e A096903 6,
%e A096903 8,
%e A096903 12,18,
%e A096903 16,
%e A096903 24,54,
%e A096903 30,
%e A096903 32,
%e A096903 36,
%e A096903 48,162,
%e A096903 60,90,150
%t A096903 SortBy[#, First] &@ Map[Union@ Map[Times @@ MapIndexed[Prime[First@ #2]^#1 &, #] &, Permutations[#]] &, Map[If[# == 1, {0}, Function[f, ReplacePart[Table[0, {PrimePi[f[[-1, 1]]]}], #] &@ Map[PrimePi@ First@ # -> Last@ # &, f]]@ FactorInteger@ #] &, Import["https://oeis.org/A025487/b025487.txt", "Data"][[1 ;; 30, -1]] ] ] // Flatten (* _Michael De Vlieger_, Feb 06 2020, using b-file from A025487 *)
%Y A096903 Cf. A025487, A055932, A066099, A108244, A108730.
%K A096903 nonn,tabf
%O A096903 0,2
%A A096903 _Ray Chandler_, Aug 01 2004
%E A096903 Edited by _Daniel Forgues_, Jan 24 2011