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 A084548 #9 Oct 07 2021 02:06:28
%S A084548 2,37,53,59,67,81,83,107,139,149,163,169,173,179,197,227,243,254,257,
%T A084548 269,274,278,283,289,293,298,317,326,343,346,347,349,353,361,373,379,
%U A084548 389,394,398,419,443,446,449,463,466,467,487,509,514,523,538,547,557,563
%N A084548 Numbers k that have primitive roots less than k that are nonnegative perfect fifth powers.
%H A084548 Amiram Eldar, <a href="/A084548/b084548.txt">Table of n, a(n) for n = 1..10000</a>
%e A084548 37 is in the sequence because 32 is a primitive root of 37 and 32 = 2^5.
%t A084548 q[n_] := Intersection[PrimitiveRootList[n], Range[Floor @ Surd[n, 5]]^5] != {}; Select[Range[600], q] (* _Amiram Eldar_, Oct 07 2021 *)
%Y A084548 Cf. A000584, A084547, A084549, A084550.
%K A084548 nonn
%O A084548 1,1
%A A084548 Hauke Worpel (hw1(AT)email.com), May 30 2003
%E A084548 Data corrected and extended by _Amiram Eldar_, Oct 07 2021