|
|
A070174
|
|
Primes p such that (p^2)! and 2^(p^2)-1 are not relatively prime.
|
|
0
|
|
|
2, 3, 11, 23, 29, 37, 43, 73, 79, 83, 113, 131, 151, 179, 191, 197, 211, 223, 233, 239, 251, 263, 283, 317, 337, 359, 367, 397, 419, 431, 443, 461, 463, 487, 491, 499, 547, 557, 571, 577, 593, 601, 617, 619, 641, 659, 683, 719
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
If q is an odd prime (p^2)! and q^(p^2)-1 are not relatively primes for any p prime.
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Prime[Range[130]], !CoprimeQ[(#^2)!, 2^#^2-1]&] (* Harvey P. Dale, Jan 15 2022 *)
|
|
PROG
|
(PARI) forprime(n=1, 263, if(gcd((n^2)!, 2^(n^2)-1)>1, print1(n, ", ")))
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|