login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A059666 Primes p such that x^54 = 2 has no solution mod p, but x^18 = 2 has a solution mod p. 3
3943, 11287, 20143, 23599, 25759, 26407, 29863, 32833, 33751, 38287, 39367, 39799, 46441, 47737, 47791, 59887, 62047, 63127, 68311, 73063, 79273, 82351, 84457, 84673, 88129, 90289, 91639, 93529, 94447, 101089, 104761, 107839, 140617, 144073, 146449, 150607 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Vincenzo Librandi, Table of n, a(n) for n = 1..49

MATHEMATICA

Select[Prime[Range[PrimePi[200000]]], !MemberQ[PowerMod[Range[#], 54, #], Mod[2, #]] && MemberQ[PowerMod[Range[#], 18, #], Mod[2, #]]&] (* Vincenzo Librandi, Sep 21 2013 *)

PROG

(MAGMA) [p: p in PrimesUpTo(40000) | not exists{x: x in ResidueClassRing(p) | x^54 eq 2} and exists{x: x in ResidueClassRing(p) | x^18 eq 2}]; // Vincenzo Librandi, Sep 21 2012

CROSSREFS

A000040, A049550, A040993.

Sequence in context: A115929 A070185 A059354 * A230707 A230617 A250531

Adjacent sequences:  A059663 A059664 A059665 * A059667 A059668 A059669

KEYWORD

nonn,easy

AUTHOR

Klaus Brockhaus, Feb 05 2001

EXTENSIONS

More terms from Vincenzo Librandi, Sep 21 2013

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 5 19:02 EDT 2020. Contains 335473 sequences. (Running on oeis4.)