The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A103717 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A103717

Denominators of sum_{k=1..n} 1/k^10 = Zeta(10,n).
(history; published version)

#12 by Vaclav Kotesovec at Mon Jan 19 03:40:49 EST 2015

STATUS

proposed

approved

#11 by Michel Marcus at Mon Jan 19 00:21:38 EST 2015

STATUS

editing

proposed

#10 by Michel Marcus at Mon Jan 19 00:20:57 EST 2015

NAME

Denominators of sum_{k=1..n} 1/k^10 =: Zeta(10,n).

STATUS

proposed

editing

#9 by Jon E. Schoenfield at Sun Jan 18 22:43:45 EST 2015

STATUS

editing

proposed

#8 by Jon E. Schoenfield at Sun Jan 18 22:43:43 EST 2015

NAME

Denominators of sum(_{k=1..n} 1/k^10,k=1..n) =: Zeta(10,n).

MATHEMATICA

s=0; lst={}; Do[s+=n^1/n^11; AppendTo[lst, Denominator[s]], {n, 3*4!}]; lst [From _(* _Vladimir Joseph Stephan Orlovsky_, Jan 24 2009] *)

STATUS

approved

editing

#7 by Bruno Berselli at Wed Dec 04 03:18:43 EST 2013

STATUS

proposed

approved

#6 by Jean-François Alcover at Wed Dec 04 03:07:18 EST 2013

STATUS

editing

proposed

#5 by Jean-François Alcover at Wed Dec 04 03:06:44 EST 2013

MATHEMATICA

Table[ HarmonicNumber[n, 10] // Denominator, {n, 1, 10}] (* Jean-François Alcover, Dec 04 2013 *)

STATUS

approved

editing

#4 by Charles R Greathouse IV at Fri Oct 12 14:40:23 EDT 2012

AUTHOR

Wolfdieter Lang (wolfdieter.lang_AT_physik_DOT_uni-karlsruhe_DOT_de), Feb 15 2005

Wolfdieter Lang, Feb 15 2005

Discussion

Fri Oct 12

14:40

OEIS Server: https://oeis.org/edit/global/1838

#3 by Russ Cox at Sat Mar 31 12:38:10 EDT 2012

MATHEMATICA

s=0; lst={}; Do[s+=n^1/n^11; AppendTo[lst, Denominator[s]], {n, 3*4!}]; lst [From _Vladimir Joseph Stephan Orlovsky (4vladimir(AT)gmail.com), _, Jan 24 2009]

Discussion

Sat Mar 31

12:38

OEIS Server: https://oeis.org/edit/global/876