[go: up one dir, main page]

login
A154660
Numbers n such that n!+37 and abs(n!-37) are primes.
5
3, 4, 5, 6, 7, 8
OFFSET
1,1
COMMENTS
5!-37=83;5!+37=157,...
MATHEMATICA
lst={}; a=37; Do[If[PrimeQ[n!-a]&&PrimeQ[n!+a], AppendTo[lst, n]], {n, 2*5!}]; lst
CROSSREFS
Sequence in context: A134483 A121151 A088243 * A004492 A360663 A333914
KEYWORD
nonn,full,fini
AUTHOR
EXTENSIONS
Name corrected by Chai Wah Wu, Oct 18 2020
STATUS
approved