The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A014755 3 and -3 are both 4th powers (one implies other) mod these primes p=1 mod 8. 3
 193, 313, 433, 577, 601, 673, 769, 937, 1201, 1297, 1321, 1657, 1801, 1993, 2137, 2473, 2521, 2593, 2833, 2953, 3169, 3529, 3673, 3697, 3769, 3889, 4057, 4129, 4153, 4297, 4441, 4513, 4561, 4801, 4969, 5113, 5209, 5233, 5281, 5449, 5521 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Robert Israel, Table of n, a(n) for n = 1..10000 MAPLE filter:= proc(p) isprime(p) and [msolve(x^4=3, p)] <> [] end proc: select(filter, [seq(i, i=1..10^4, 8)]); # Robert Israel, May 07 2019 MATHEMATICA okQ[p_] := PrimeQ[p] && Solve[x^4 == 3, x, Modulus -> p] != {}; Select[Range[1, 10000, 8], okQ] (* Jean-François Alcover, Feb 08 2023 *) PROG (PARI) forprime(p=1, 9999, p%8==1&&ispower(Mod(3, p), 4)&&print1(p", ")) \\ M. F. Hasler, Feb 18 2014 (PARI) is_A014755(p)={p%8==1&&ispower(Mod(3, p), 4)&&isprime(p)} \\ M. F. Hasler, Feb 18 2014 CROSSREFS Cf. A007519. Sequence in context: A015988 A260539 A142743 * A238667 A216451 A139506 Adjacent sequences: A014752 A014753 A014754 * A014756 A014757 A014758 KEYWORD nonn AUTHOR Warren D. Smith EXTENSIONS Offset changed from 0 to 1 by Bruno Berselli, Feb 20 2014 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified May 28 02:01 EDT 2023. Contains 362992 sequences. (Running on oeis4.)