|
|
A067930
|
|
Nonprime solutions to k == -1 (mod phi(k+1)).
|
|
1
|
|
|
1, 15, 35, 63, 95, 143, 161, 215, 255, 287, 323, 485, 511, 575, 767, 1023, 1295, 1457, 1535, 1727, 1943, 2047, 2303, 2915, 3071, 3455, 3887, 4095, 4607, 5183, 5831, 7775, 9215, 10367, 11663, 12287, 13823, 16383, 17495, 18431, 20735, 24575, 26243, 31103, 32767
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Odd terms in A005105 are primes solutions to p==-1 (mod phi(p+1)).
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[30000], !PrimeQ[#] && Divisible[# + 1, EulerPhi[# + 1]] &] (* Amiram Eldar, Nov 29 2020 *)
|
|
PROG
|
(PARI) isok(m) = !isprime(m) && (Mod(m, eulerphi(m+1)) == -1); \\ Michel Marcus, Nov 29 2020
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|