A264235 Denominator of the coefficients in the expansion of 1/W(x) - 1/x where W(x) is the Lambert W function.

1, 2, 3, 8, 15, 144, 35, 5760, 2835, 44800, 6237, 43545600, 25025, 6706022400, 13030875, 229605376, 10854718875, 376610217984000, 282907625, 128047474114560000, 311834363841, 166487326720000, 407510816383125, 26976017466662584320000, 62628675484375

Offset: 0

Author

Peter Luschny, Nov 09 2015

Keywords

• nonn
• frac

Comments

If prefixed by an additional 1, denominators of coefficients of expansion of exp(W(x)). - N. J. A. Sloane, Jan 08 2021

Examples

			Coefficients of expansion of exp(W(x)) are 1, 1, -1/2, 2/3, -9/8, 32/15, -625/144, 324/35, -117649/5760, 131072/2835, -4782969/44800, ... - _N. J. A. Sloane_, Jan 08 2021
		

Crossrefs

Numerators are in A264234.

Similar to but strictly different from A230284.

Programs

Mathematica

CoefficientList[Series[1/ProductLog[x] - 1/x, {x, 0, 21}], x] // Denominator