This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A378430 #18 Dec 23 2024 21:58:59
%S A378430 180,252,300,360,396,450,468,504,540,588,600,612,684,700,720,756,792,
%T A378430 828,882,900,936,980,1008,1044,1080,1100,1116,1176,1188,1200,1224,
%U A378430 1260,1300,1332,1350,1368,1400,1404,1440,1452,1476,1500,1512,1548,1575,1584,1620,1656
%N A378430 a(n) = Sqrt(A378984(n)).
%C A378430 Distinct from A350372; a(20) = 900 is not in A350372.
%C A378430 Proper subset of A126706, intersects A286708.
%H A378430 Michael De Vlieger, <a href="/A378430/b378430.txt">Table of n, a(n) for n = 1..10000</a>
%t A378430 s = Union@ Select[Flatten@ Table[a^2*b^3, {b, Surd[#, 3]}, {a, Sqrt[#/b^3]}] &[2^21], IntegerQ@ Sqrt[#] &];
%t A378430 t = Select[s, Length@ Select[FactorInteger[#][[All, -1]], # > 2 &] >= 2 &];
%t A378430 Map[Sqrt, Select[t, PrimeOmega[#] > PrimeNu[#] > 2 &] ]
%Y A378430 Cf. A126706, A286708, A350372, A378984.
%K A378430 nonn,easy
%O A378430 1,1
%A A378430 _Michael De Vlieger_, Dec 23 2024