The On-Line Encyclopedia of Integer Sequences (OEIS)

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

A141588

Numerators of expansion for Debye function (D(1,x)) A120082 with 1's instead of 0's.
(history; published version)

#12 by Alois P. Heinz at Fri Dec 08 16:04:43 EST 2023

STATUS

proposed

approved

#11 by Michel Marcus at Fri Dec 08 12:40:26 EST 2023

STATUS

editing

proposed

#10 by Michel Marcus at Fri Dec 08 12:40:19 EST 2023

MATHEMATICA

swfact[n_] := n!/Floor[n/2]!^2; a[n_] := 2*Zeta[n]*swfact[n]/(2*Pi)^n*If[Mod[n, 4] == 0, -1, 1]; a[0]=1; a[1]=-1; a[_?OddQ] = 0; Numerator[ Table[a[n], {n, 0, 36}]] /. (0 -> 1) (* _Jean-François Alcover_, Aug 09 2012 *)

STATUS

proposed

editing

#9 by Andrey Zabolotskiy at Fri Dec 08 12:39:05 EST 2023

STATUS

editing

proposed

#8 by Andrey Zabolotskiy at Fri Dec 08 12:38:53 EST 2023

NAME

Take numerators Numerators of expansion for Debye function (D(1,x)) A120082 with 1's instead of 0's. Then (Bernoulli numbers numerators) A027641(n)/a(n) is an integer sequence.

COMMENTS

(Bernoulli numbers numerators) A027641(n)/a(n) is an integer sequence.

STATUS

approved

editing

#7 by Jon E. Schoenfield at Fri Jul 10 23:19:48 EDT 2015

STATUS

editing

approved

#6 by Jon E. Schoenfield at Fri Jul 10 23:19:44 EDT 2015

COMMENTS

Note 1's in denominators A120083. A120082 and A027641 are analoguousanalogous.

STATUS

approved

editing

#5 by Joerg Arndt at Thu Aug 09 09:02:14 EDT 2012

STATUS

proposed

approved

#4 by Jean-François Alcover at Thu Aug 09 08:12:18 EDT 2012

STATUS

editing

proposed

#3 by Jean-François Alcover at Thu Aug 09 08:12:04 EDT 2012

DATA

1, -1, 1, 1, -1, 1, 1, 1, -1, 1, 1, 1, -691, 1, 7, 1, 1, -3617, 1, 43867, 1, -174611, 1, 77683, 1, -236364091, 1, 657931, 1, -3392780147, 1, 1723168255201, 1, -7709321041217, 1, 151628697551, 1, -26315271553053477373

MATHEMATICA

EXTENSIONS

Typo a(14)=7 instead of 1 fixed by Jean-François Alcover, Aug 09 2012

STATUS

approved

editing