|
Search: id:A136367
|
|
| |
| |
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
A024529(n+1) = Numerator [ 1 + Sum[ (-1)^k*1/Prime[k], {k, 1, n} ] ] = {1,5,19,163,1583,22889,359083,7333087,158961311,...}.
|
|
MATHEMATICA
|
f=1; Do[ p=Prime[n]; f=f + (-1)^n*1/p; g=Numerator[f] ; If[ PrimeQ[g], Print[ {n, g} ] ], {n, 1, 60} ]
|
|
CROSSREFS
|
Cf. A024529 = Numerator of 1 + Sum_{k=1..n-1} (-1)^k / prime(k). Cf. A024530, A136366. Cf. A136365, A136368, A136369, A136370, A136371.
Sequence in context: A123823 A064959 A032988 this_sequence A014545 A158930 A065636
Adjacent sequences: A136364 A136365 A136366 this_sequence A136368 A136369 A136370
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
Alexander Adamchuk (alex(AT)kolmogorov.com), Dec 27 2007
|
|
|
Search completed in 0.002 seconds
|
