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 A103336 #12 Feb 16 2025 08:32:56
%S A103336 1,2,11,17,19,23,29,31,37,38,41,43,47,53,58,59,62,67,71,73,74,79,81,
%T A103336 82,83,86,89,94,97,101,107,113,118,121,122,125,127,131,134,137,139,
%U A103336 146,149,151,157,158,162,163,167,173,178,179,191,193,194,197,211,218,223
%N A103336 Numbers whose largest primitive root (A046146) is not prime.
%H A103336 Amiram Eldar, <a href="/A103336/b103336.txt">Table of n, a(n) for n = 1..10000</a>
%H A103336 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/PrimitiveRoot.html">Primitive Root</a>.
%t A103336 Select[Range[250], #==1 || ((p = PrimitiveRootList[#]) != {} && ! PrimeQ[Max @ p]) &] (* _Amiram Eldar_, Sep 25 2021 *)
%Y A103336 Cf. A001918, A046144, A046145, A046146, A103309, A103310, A103335, A103337, A103338.
%K A103336 nonn
%O A103336 1,2
%A A103336 _Harry J. Smith_, Jan 31 2005
%E A103336 Offset corrected by _Amiram Eldar_, Sep 25 2021