|
|
A074485
|
|
Bases n for which the smallest (Fermat) pseudoprime greater than n has Moebius function mu = -1.
|
|
2
|
|
|
41, 49, 71, 83, 97, 104, 111, 148, 155, 157, 161, 163, 164, 167, 169, 181, 190, 194, 197, 205, 209, 223, 227, 229, 230, 231, 239, 243, 254, 265, 269, 272, 277, 284, 323, 331, 341, 344, 348, 351, 353, 355, 356, 358, 371, 373, 379, 383, 384, 388, 391, 395
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
41: Its smallest pseudoprime is 105 = 3 * 5 * 7 and mu (105) = -1 <= (105 > 41).
49: Its smallest pseudoprime is 66 = 2 * 3 * 11 and mu (66) = -1 <= (66 > 49).
71: Its smallest pseudoprime is 105 = 3 * 5 * 7 and mu (105) = -1 <= (105 > 71).
|
|
PROG
|
(PARI) is(n)=my(k=n+1); while(isprime(k)||Mod(n, k)^(k-1)!=1, k++); moebius(k)<0 \\ Charles R Greathouse IV, Aug 22 2013
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|