|
Search: id:A125685
|
|
|
| A125685 |
|
Primes in A125683(n) = numerator[ Sum[ (-1)^(k+1) * 1/(k(k+1)), {k,1,n} ]. |
|
+0
3
|
|
| 5, 11, 2, 79, 331, 479, 5297, 70061, 69203, 8960447, 45083347, 1031626241, 15484789693, 15537907043, 64166447971, 3979714828967, 3988907823167, 27918983997629, 598858179567591121853, 31710728461561839214229
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Corresponding numbers n such that A125683(n) is prime are listed in A125684(n) = {3,4,5,6,7,8,10,13,14,18,21,22,26,27,28,32,33,35,51,54,58,67,76,89,100,...}.
|
|
FORMULA
|
a(n) = A125683[ A125684(n) ].
|
|
EXAMPLE
|
A125683(n) begins {1,1,5,11,2,79,331,479,493,5297,2701,69071,70061,...}.
Thus a(1) = 5 because A125683(3) = 5 is prime but A125683(k) is not prime for k<3.
a(2)-a(6) = {11,2,79,331,479} because A125683(k) is prime for 3<k<9.
|
|
MATHEMATICA
|
Select[Table[Numerator[Sum[(-1)^(k+1)*1/(k(k+1)), {k, 1, n}]], {n, 1, 100}], PrimeQ]
|
|
CROSSREFS
|
Cf. A125683, A125684.
Adjacent sequences: A125682 A125683 A125684 this_sequence A125686 A125687 A125688
Sequence in context: A087463 A111118 A125683 this_sequence A098147 A100298 A066461
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Alexander Adamchuk (alex(AT)kolmogorov.com), Nov 30 2006
|
|
|
Search completed in 0.002 seconds
|
