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 A230843 #15 Feb 16 2021 04:33:06 %S A230843 1,2,3,4,5,7,9,11,12,13,17,18,19,20,23,25,28,29,31,37,41,43,44,45,47, %T A230843 49,50,52,53,59,61,63,67,68,71,73,75,76,79,83,89,92,97,98,99,101,103, %U A230843 107,109,113,116,117,121,124,127,131,137,139,147,148,149,151,153,157,163,164,167,169,171 %N A230843 Cubefree numbers which in their canonical prime factorization have mutually distinct exponents. %H A230843 Amiram Eldar, <a href="/A230843/b230843.txt">Table of n, a(n) for n = 1..10000</a> %t A230843 q[n_] := Max[(e = FactorInteger[n][[;; , 2]])] < 3 && Length @ Union[e] == Length[e]; Select[Range[200], q] (* _Amiram Eldar_, Feb 16 2021 *) %Y A230843 Intersection of A004709 and A130091. %Y A230843 Disjoint union of {1}, A000040, A001248 and A054753. %K A230843 nonn,easy %O A230843 1,2 %A A230843 _Gerasimov Sergey_, Oct 31 2013