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 A079712 #28 Jun 29 2022 03:50:31 %S A079712 1,8,27,96,125,144,160,216,224,324,343,352,400,416,486,544,608,736, %T A079712 784,928,992,1000,1184,1215,1312,1331,1376,1504,1696,1701,1888,1920, %U A079712 1936,1952,2025,2144,2197,2272,2336,2500,2528,2656,2673,2688,2704,2744,2848 %N A079712 Numbers m such that bigomega(m) = 3*omega(m). %C A079712 A cube k is a term iff k belongs to A062838; in this case, k = p_1^3 * p_2^3 *...* p_r^3 and bigomega(k) = 3*omega(k) = 3*r. - _Bernard Schott_, May 09 2022 %H A079712 Enrique Pérez Herrero, <a href="/A079712/b079712.txt">Table of n, a(n) for n = 1..2000</a> %t A079712 Select[Range[3000], PrimeOmega[#] == 3*PrimeNu[#] &] (* _Amiram Eldar_, Jun 29 2022 *) %o A079712 (PARI) is(n)=my(f=factor(n)[,2]); vecsum(f)==3*#f \\ _Charles R Greathouse IV_, Oct 16 2015 %Y A079712 Cf. A067801, A062838 (subsequence of cubes). %K A079712 nonn %O A079712 1,2 %A A079712 _Benoit Cloitre_, Jan 31 2003