Example 5.3 To produce a sequence

DIGITS := 20:

extract := proc(n1:Type::Integer, n2:Type::Integer)

local sequence, n;

begin

   sequence := float((1 + 1/n)^n) $ n=n1..n2;

   return(sequence)

end:

mySequence := extract(5000,5001)

2.7180100501018540468, 2.7180101044366972794

© Miroslaw Majewski, Abu Dhabi,  Update  26-10-2004