|
|
A091817
|
|
(2*numerator(H(p-3)) -3*denominator(H(p-3)))/p with H(m) = 1 + 1/2 + 1/3 + ...+ 1/m.
|
|
0
|
|
|
-1, 0, 2, 62, 554, 74258, 142682, 2830946, 1448977246, 12576415426, 1857881203154, 64634117421826, 62771945063582, 164497840779865642, 350742295126606034006, 5774653629556529218142, 5647762835059481932498, 12720214895833193424471634
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
COMMENTS
|
Leroy Quet conjectures that the terms are always integral. This is true for p < 3*10^4.
|
|
LINKS
|
|
|
FORMULA
|
|
|
PROG
|
(PARI) H(n)=sum(i=1, n, 1/i); forprime(p=3, 100, print1((2*numerator(H(p-3))-3*denominator(H(p-3)))/p, ", "))
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Mohammed Bouayoun (bouyao(AT)wanadoo.fr) and Ralf Stephan, Mar 07 2004
|
|
STATUS
|
approved
|
|
|
|