|
Search: id:A065428
|
|
|
| A065428 |
|
Numbers n such that all x^2 mod n are nonprimes. |
|
+0 2
|
|
| 1, 2, 3, 4, 5, 8, 12, 15, 16, 24, 28, 40, 48, 56, 60, 72, 88, 112, 120, 168, 232, 240, 280, 312, 408, 520, 760, 840, 1320, 1848
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
All numbers in this sequence except 56 are idoneal (A000926) - Joerg Arndt (arndt(AT)jjj.de), Jul 13 2005
No more terms < 10^6. - T. D. Noe (noe(AT)sspectra.com), Aug 10 2007
No more terms < 10^11. [From Charles R Greathouse IV Dec 15 2008]
|
|
LINKS
|
Joerg Arndt, Fxtbook
|
|
MATHEMATICA
|
t={}; Do[s=Union[Mod[Range[n]^2, n]]; If[Select[s, PrimeQ]=={}, AppendTo[t, n]], {n, 1000}]; t - T. D. Noe (noe(AT)sspectra.com), Aug 10 2007
|
|
CROSSREFS
|
Sequence in context: A053021 A122700 A048486 this_sequence A059747 A094087 A017821
Adjacent sequences: A065425 A065426 A065427 this_sequence A065429 A065430 A065431
|
|
KEYWORD
|
nonn,nice,more
|
|
AUTHOR
|
Joerg Arndt (jj(AT)suse.de), Nov 16 2001
|
|
|
Search completed in 0.002 seconds
|