OFFSET
0,1
PROG
(Magma) m:=30; R:=RealField(m); a:=Intseq(Round(Exp(elt<R | 1, 0>)*10^m), 10); Reverse(~a); [ &+[ Binomial(i-1, k-1)*a[k]: k in [1..i] ]: i in [1..m] ]; /* Klaus Brockhaus, Jun 14 2007 */
CROSSREFS
KEYWORD
nonn,easy,base
AUTHOR
Paul Curtz, Jun 13 2007
EXTENSIONS
Edited by N. J. A. Sloane, Jun 13 2007
Corrected and extended by Klaus Brockhaus, Jun 14 2007
STATUS
approved