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 A177425 #18 Mar 25 2014 14:02:31
%S A177425 12,18,20,24,28,40,44,45,48,50,52,54,56,63,68,72,75,76,80,88,92,96,98,
%T A177425 99,104,108,112,116,117,124,135,136,144,147,148,152,153,160,162,164,
%U A177425 171,172,175,176,184,188,189,192,200,207,208,212,224,232,236,242,244,245
%N A177425 Integers with multiple and strictly distinct powers.
%C A177425 12=2^2*3, 18=2*3^2,.. 600=2^3*3*5^2,..
%H A177425 Lei Zhou, <a href="/A177425/b177425.txt">Table of n, a(n) for n = 1..10000</a>
%F A177425 a(n) << n log n. - _Charles R Greathouse IV_, Mar 25 2014
%t A177425 f[n_]:=Sort[Last/@FactorInteger[n]];lst={};Do[If[Length[f[n]]>1&&f[n]==Union@f[n],AppendTo[lst,n]],{n,0,6!}];lst
%o A177425 (PARI) is(n)=my(f=vecsort(factor(n)[,2]~)); n>1 && Set(f)==f && #f>1 \\ _Charles R Greathouse IV_, Mar 20 2014
%Y A177425 Apart from its first term, A001749 is a subsequence.
%Y A177425 Cf. A001358.
%K A177425 nonn,easy
%O A177425 1,1
%A A177425 _Vladimir Joseph Stephan Orlovsky_, May 07 2010