A144525 Numerators of expansion of exp(1-sqrt(1-3*x)).

1, 3, 9, 63, 999, 10773, 196911, 6562701, 128858769, 1295150391, 9472912497, 1895674219911, 11402464056957, 5518764184829697, 207312834548907783, 11211449358195509373, 976639971170302762149, 590444288071830626391, 1001189263964851383868503

Offset: 0

Author

N. J. A. Sloane, Dec 20 2008

Keywords

• nonn
• frac

Examples

			1 + (3/2)*x + (9/4)*x^2 + (63/16)*x^3 + (999/128)*x^4 + (10773/640)*x^5 + (196911/5120)*x^6 + ...
		

Crossrefs

Cf. A144526, A001511, A143991/A143968.

Programs

Mathematica

CoefficientList[Series[Exp[1-Sqrt[1-3x]],{x,0,20}],x]//Numerator (* Harvey P. Dale, Dec 27 2022 *)