%I #7 Feb 24 2024 11:04:29
%S 1,8,12,64,144,216,360,512,768,1152,1260,1728,2880,4096,6144,7200,
%T 10800,13824,15360,20736,23040,25200,27000,32768,34560,37800,46656,
%U 49152,73728,80640,86400,110592,129600,138600,165888,184320,201600,216000,248832,262144,276480
%N Terms of A370650 that are of least prime signature.
%C If k is a term, then all the numbers with the same prime signature as k are terms of A370650.
%C 2^A039004(k) is a term for all k >= 1.
%H Amiram Eldar, <a href="/A370651/b370651.txt">Table of n, a(n) for n = 1..10000</a>
%t lps = Cases[Import["https://oeis.org/A025487/b025487.txt", "Table"], {_, _}][[;; , 2]]; Select[lps, q] (* using the function q[n] in A370650 *)
%Y Intersection of A025487 and A370650.
%Y Cf. A039004.
%K nonn
%O 1,2
%A _Amiram Eldar_, Feb 24 2024