Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A064169
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A064169 Numerator - denominator in n-th harmonic number, 1 + 1/2 + 1/3 +...+ 1/n. +0
3
0, 1, 5, 13, 77, 29, 223, 481, 4609, 4861, 55991, 58301, 785633, 811373, 835397, 1715839, 29889983, 10190221, 197698279, 40315631, 13684885, 13920029, 325333835, 990874363, 25128807667, 25472027467, 232222818803, 235091155703 (list; graph; listen)
OFFSET

1,3

COMMENT

The numerator and denominator in the definition have no common factors >1.

Numerator of ( HarmonicNumber[n] - 1 ). - Alexander Adamchuk (alex(AT)kolmogorov.com), Jun 09 2006

p divides a(p-2) for prime p>3. - Alexander Adamchuk (alex(AT)kolmogorov.com), Jun 09 2006

LINKS

Leroy Quet, Home Page (listed in lieu of email address)

Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics - Harmonic Number.

FORMULA

Numerators of gamma+Psi(n+1)-1. - Vladeta Jovovic (vladeta(AT)eunet.rs), Aug 12 2002

a(n) = Numerator[ Sum[ 1/k, {k,2,n} ]]. a(n) = A001008(n) - A002805(n). a(n) = Numerator[ HarmonicNumber[n] - 1 ] a(n) = Numerator[ A001008(n)/A002805(n) -1 ] - Alexander Adamchuk (alex(AT)kolmogorov.com), Jun 09 2006

EXAMPLE

The 3rd harmonic number is 11/6. So a(3) = 11 - 6 = 5.

MAPLE

ZL:=n->sum(1/i, i=2..n): a:=n->floor(numer(ZL(n))): seq(a(n), n=1..28); - Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Mar 28 2007

MATHEMATICA

f[ n_ ] := (s = Sum[ 1/k, {k, 1, n} ]; Numerator[ s ] - Denominator[ s ]); Table[ f[ n ], {n, 1, 25} ]

Numerator[Table[Sum[1/k, {k, 2, n}], {n, 1, 30}]] - Alexander Adamchuk (alex(AT)kolmogorov.com), Jun 09 2006

CROSSREFS

Cf. A001008, A002805.

Sequence in context: A137702 A140120 A163732 this_sequence A081525 A027612 A027457

Adjacent sequences: A064166 A064167 A064168 this_sequence A064170 A064171 A064172

KEYWORD

nonn

AUTHOR

Leroy Quet Sep 19 2001

EXTENSIONS

One more term from Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 28 2001

More terms from Vladeta Jovovic (vladeta(AT)eunet.rs), Aug 12 2002

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified November 24 14:25 EST 2009. Contains 167438 sequences.


AT&T Labs Research