A124880 Primes in A124837.
7, 47, 42131, 23763863, 192066102203, 5733412167187, 34745876421709, 185813891783454008069, 171312804637561107990389, 29207630124216024960052176833, 6300447575454970515437116064749
Offset: 1
Keywords
Examples
A124837(n) begins {1, 7, 47, 57, 459, 341, 3349, 3601, 42131, 44441, ...}. Thus a(1) = 7, a(2) = 47, a(3) = 42131.
Links
- Eric Weisstein's World of Mathematics, Harmonic Number.
Crossrefs
Programs
-
Mathematica
s=3/2;Do[s=s+1/n;f=Numerator[n*(n-1)/2*(s-3/2)]; If[PrimeQ[f],Print[{n-2,f}]],{n,3,125}]
Extensions
Crossrefs edited by Michel Marcus, Jul 14 2018