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 A040045 #14 Jul 08 2025 22:43:22 %S A040045 7,19,31,37,43,61,73,79,97,103,109,139,151,157,193,223,229,271,277, %T A040045 283,307,331,349,373,397,421,433,439,463,499,523,541,547,571,577,601, %U A040045 607,613,619,661,673,709,727,751 %N A040045 Primes p such that x^3 = 5 has no solution mod p. %C A040045 Complement of A040044 relative to A000040. - _Vincenzo Librandi_, Sep 17 2012 %H A040045 Vincenzo Librandi, <a href="/A040045/b040045.txt">Table of n, a(n) for n = 1..1000</a> %t A040045 ok[p_]:= Reduce[Mod[x^3 - 5, p] == 0, x, Integers] == False;Select[Prime[Range[200]], ok] (* _Vincenzo Librandi_, Sep 17 2012 *) %o A040045 (Magma) [p: p in PrimesUpTo(1000) | not exists{x : x in ResidueClassRing(p) | x^3 eq 5} ]; _Vincenzo Librandi_, Sep 17 2012 %K A040045 nonn,easy %O A040045 1,1 %A A040045 _N. J. A. Sloane_