|
| |
|
|
A089131
|
|
Primes of the form (n!+3)/3.
|
|
2
| | |
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Vincenzo Librandi, Table of n, a(n) for n = 1..13
|
|
|
MATHEMATICA
| Select[Table[(n!+3)/3, {n, 0, 50}], PrimeQ] (* Vincenzo Librandi, Dec 12 2011 *)
|
|
|
PROG
| (PARI) nfactp2d2(n) = { for(x=1, n, y=floor((x!+ 3)/3); if(isprime(y), print1(y", ")) ) }
(MAGMA) [a: n in [1..50] | IsPrime(a) where a is (Factorial(n)+3) div 3]; // Vincenzo Librandi, Dec 12 2011
|
|
|
CROSSREFS
| Cf. A089085.
Sequence in context: A080347 A106978 A200817 * A057650 A181226 A159249
Adjacent sequences: A089128 A089129 A089130 * A089132 A089133 A089134
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Cino Hilliard (hillcino368(AT)gmail.com), Dec 05 2003
|
|
|
EXTENSIONS
| The next term is too large to include.
|
| |
|
|
