|
| |
|
|
A126782
|
|
Primes of the form [n! mod (n!!+1)]/2, with n>=1.
|
|
0
| | |
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| n=6 n!=720 n!!=48 [n! mod (n!!+1)]/2 = (720 mod 49)/2 = 34/2 = 17
n=7 n!=5040 n!!=105 [n! mod (n!!+1)]/2 = (5040 mod 106)/2 = 58/2 = 29
|
|
|
MAPLE
| P:=proc(n) local i, j, k, w; for i from 2 by 1 to n do k:=i; w:=i-2; while w>0 do k:=k*w; w:=w-2; od; j:=(i! mod (k+1))/2; if isprime(j) then print(j); fi; od; end: P(1000);
|
|
|
CROSSREFS
| Cf. A055490.
Sequence in context: A107158 A188620 A152529 * A090648 A031024 A045437
Adjacent sequences: A126779 A126780 A126781 * A126783 A126784 A126785
|
|
|
KEYWORD
| hard,nonn
|
|
|
AUTHOR
| Paolo P. Lava & Giorgio Balzarotti (paoloplava(AT)gmail.com), Mar 14 2007
|
| |
|
|
