login

Revision History for A242091

(Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
a(n) = r * (n-1)! where r is the rational number that satisfies the equation Sum_{k>=n} (-1)^(k + n)/C(k,n) = n*2^(n-1)*log(2) - r.
(history; published version)
#45 by Charles R Greathouse IV at Thu Sep 08 08:46:08 EDT 2022
PROG

(MAGMAMagma) [n le 1 select 0 else 2*(n)*Self(n-1)+(Factorial(n) div (n-1)): n in [1..20]]; // Vincenzo Librandi, Sep 22 2015

Discussion
Thu Sep 08
08:46
OEIS Server: https://oeis.org/edit/global/2944
#44 by Bruno Berselli at Mon Nov 27 02:48:38 EST 2017
STATUS

reviewed

approved

#43 by Joerg Arndt at Mon Nov 27 02:46:22 EST 2017
STATUS

proposed

reviewed

#42 by G. C. Greubel at Mon Nov 27 00:35:28 EST 2017
STATUS

editing

proposed

#41 by Michel Marcus at Sun Nov 26 01:45:32 EST 2017
PROG

(PARI) x='x+O('x^30); concat([0], Vec(serlaplace(x*log(1-x)/(2*x-1)))) \\ _G. C. Geubel_, Greubel_, Nov 25 2017

STATUS

proposed

editing

#40 by G. C. Greubel at Sat Nov 25 17:50:54 EST 2017
STATUS

editing

proposed

Discussion
Sat Nov 25
18:02
Robert G. Wilson v: Would someone check the Egf.
18:45
G. C. Greubel: The egf for this sequence is correct.
#39 by G. C. Greubel at Sat Nov 25 17:50:44 EST 2017
LINKS

G. C. Greubel, <a href="/A242091/b242091.txt">Table of n, a(n) for n = 1..400</a>

FORMULA

a(n) = n! * sum(Sum_{j=1..(n-1, )} 2^(n-j-1)/j).

PROG

(PARI) x='x+O('x^30); concat([0], Vec(serlaplace(x*log(1-x)/(2*x-1)))) \\ _G. C. Geubel_, Nov 25 2017

STATUS

approved

editing

#38 by Michel Marcus at Tue Sep 22 05:26:41 EDT 2015
STATUS

reviewed

approved

#37 by Michael B. Porter at Tue Sep 22 04:21:55 EDT 2015
STATUS

proposed

reviewed

#36 by Vincenzo Librandi at Tue Sep 22 01:44:48 EDT 2015
STATUS

editing

proposed