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 A084547 #8 Sep 25 2021 06:50:13 %S A084547 2,11,25,29,34,50,53,58,59,83,89,101,106,107,113,121,125,131,137,149, %T A084547 166,167,173,178,179,197,202,214,226,227,233,250,251,257,263,269,274, %U A084547 281,289,293,298,317,334,346,347,353,358,359 %N A084547 Numbers n that have primitive roots less than n that are nonnegative perfect cubes. %H A084547 Amiram Eldar, <a href="/A084547/b084547.txt">Table of n, a(n) for n = 1..10000</a> %e A084547 89 is in the sequence because 27 is a primitive root of 89 and 27 is three cubed. %t A084547 q[n_] := Intersection[PrimitiveRootList[n], Range[Floor@Surd[n, 3]]^3] != {}; Select[Range[360], q] (* _Amiram Eldar_, Sep 25 2021 *) %Y A084547 Cf. A000578, A084548, A084549, A084550. %K A084547 nonn %O A084547 1,1 %A A084547 Hauke Worpel (hw1(AT)email.com), May 30 2003 %E A084547 a(1) inserted by _Amiram Eldar_, Sep 25 2021