|
|
A240161
|
|
Numbers n such that (k!-n)/k is prime for some k.
|
|
3
|
|
|
4, 5, 7, 8, 12, 13, 15, 16, 25, 31, 33, 34, 35, 39, 42, 55, 65, 66, 77, 78, 85, 95, 102, 105, 110, 114, 121, 130, 133, 136, 138, 152, 156, 167, 169, 170, 186, 187, 203, 204, 221, 222, 232, 246, 248, 253, 255, 259, 279, 282, 290, 294, 296, 301, 318, 322, 325, 328, 329, 333, 354, 366
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
PROG
|
(PARI)
a(n)=for(k=1, n, s=(k!-n)/k; if(floor(s)==s, if(ispseudoprime(s), return(k))))
n=1; while(n<500, if(a(n), print1(n, ", ")); n++)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|