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 A111398 #10 Nov 16 2015 07:43:41 %S A111398 1,24,30,40,42,54,56,66,70,78,88,102,104,105,110,114,128,130,135,136, %T A111398 138,152,154,165,170,174,182,184,186,189,190,195,222,230,231,232,238, %U A111398 246,248,250,255,258,266,273,282,285,286,290,296,297 %N A111398 Numbers which are the cube roots of the product of their proper divisors. %C A111398 This sequence is actually the sequence of 4-multiplicatively perfect numbers all of whose elements (>1) have prime signature {7}, {1,3} or {1,1,1}. %H A111398 Harvey P. Dale, <a href="/A111398/b111398.txt">Table of n, a(n) for n = 1..1000</a> %F A111398 1 together with numbers with 8 divisors. - _Vladeta Jovovic_, Nov 12 2005 %t A111398 Select[Range[300],Surd[Times@@Most[Divisors[#]],3]==#&] (* _Harvey P. Dale_, Nov 16 2015 *) %o A111398 (PARI) isok(n) = {prd = 1; fordiv(n, d, prd = prd*d); prd == n^4;} \\ _Michel Marcus_, Oct 04 2013 %Y A111398 Cf. A048945, A111399. Essentially the same as A030626. %Y A111398 Cf. A030626, A007956. %K A111398 nonn %O A111398 1,2 %A A111398 _Ant King_, Nov 11 2005 %E A111398 More terms from _Michel Marcus_, Oct 04 2013