Mathematica: Neuformulierung Polynomkoeffizienten

Question

ich nach einer Möglichkeit, das Polynom zu setzen:

x + 5x^2/2 + 3x^3 + 8x^4/3 + 43x^5/24 + 43x^6/48 

in eine "Taylor" -ish Form:

x/1! + 5x^2/2! + 18x^3/3! + 64x^4/4! + 215x^5/5! + 645x^6/6! 

Mein Hauptziel ist es, um die Koeffizienten von der neuen Form abzulesen. d. ich interessiere mich für die Zahlen:

1,5,18,64,215,645 etc.. 

Answer 1

Das?

poly = x + 5 x^2/2 + 3 x^3 + 8 x^4/3 + 43 x^5/24 + 43 x^6/48; 
Table[poly[[i]]/x^i*i!, {i, Length[poly]}] 

die Yup

{1, 5, 18, 64, 215, 645}