|
| |
|
|
A144957
|
|
Primes of the form n!-n^2-1.
|
|
0
| |
|
|
7, 683, 87178291003, 23721732428800468856771473051394170805702085973808045661837377170052497697783313457227249544076486314839447086187187275319400401837013955325179315652376928996065123321190898603130879999999999999999999999999984123
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| lst={}; Do[s=n!-n^2; If[PrimeQ[p=s-1], AppendTo[lst, p]], {n, 3, 2*5!}]; lst
|
|
|
PROG
| (PARI) for(n=1, 1e3, if(ispseudoprime(t=n!-n^2-1), print1(t", "))) \\ Charles R Greathouse IV, Oct 03 2011
|
|
|
CROSSREFS
| Sequence in context: A013568 A174853 A038803 * A163016 A174855 A186160
Adjacent sequences: A144954 A144955 A144956 * A144958 A144959 A144960
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 27 2008
|
| |
|
|
