|
| |
|
|
A040028
|
|
Primes p such that x^3 = 2 has a solution mod p.
|
|
23
| |
|
|
2, 3, 5, 11, 17, 23, 29, 31, 41, 43, 47, 53, 59, 71, 83, 89, 101, 107, 109, 113, 127, 131, 137, 149, 157, 167, 173, 179, 191, 197, 223, 227, 229, 233, 239, 251, 257, 263, 269, 277, 281, 283, 293, 307, 311, 317, 347, 353, 359, 383, 389, 397, 401, 419, 431, 433
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| This is the union of {3}, A003627 (primes congruent to 2 mod 3) and A014752 (primes of the form x^2+27y^2). By Thm. 4.15 of [Cox], p is of the form x^2+27y^2 if and only if p is congruent to 1 mod 3 and 2 is a cubic residue mod p. If p is not congruent to 1 mod 3, then every number is a cubic residue mod p, including 2. - Andrew V. Sutherland (drew(AT)math.mit.edu), Apr 26 2008
|
|
|
REFERENCES
| David A. Cox, "Primes of the Form x^2+ny^2", 1998, John Wiley & Sons.
Kenneth Ireland and Michael Rosen, "A Classical Introduction to Modern Number Theory", second ed., 1990, Springer-Verlag.
|
|
|
LINKS
| T. D. Noe, Table of n, a(n) for n=1..1000
Index entries for related sequences
|
|
|
MATHEMATICA
| f[p_] := Block[{k = 2}, While[k < p && Mod[k^3, p] != 2, k++ ]; If[k == p, 0, 1]]; Select[ Prime[ Range[100]], f[ # ] == 1 &] (from Robert G. Wilson v Jul 26)
|
|
|
PROG
| (MAGMA) [ p: p in PrimesUpTo(433) | exists(t){x : x in ResidueClassRing(p) | x^3 eq 2} ]; [From Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Dec 02 2008]
|
|
|
CROSSREFS
| Cf. A001132. Number of primes p < 10^n for which 2 is a cubic residue (mod p) is in A097142.
Cf. A003627, A014572.
Sequence in context: A079545 A154755 A040095 * A049589 A049583 A049596
Adjacent sequences: A040025 A040026 A040027 * A040029 A040030 A040031
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com).
|
|
|
EXTENSIONS
| Typo corrected to A014752 Paul Landon (paullandon(AT)hotmail.com), Jan 25 2010
|
| |
|
|
