Apply exponential calculation to a range of cells with the symbol ^ As we can find the relevant +, -, *, / symbol on the keyboard, also we can use the symbol ^ to apply the exponential calculations. Such as 10^2, it stands for 10 to the power of 2. And the calculating result is 100. So we can use this way as follows: 1. Woodwork City pizza of Sarasota Exponential Integral Function Excel. Exponential integral function approximation. Exponential Regression using Microsoft Excel.

• Integrals With Exponentials

Hi apo__1,

Thank you for all your useful suggestions and good knowledge. However, I am not a math/computer-science/software savvy, and have no access to Maple, Mathematica, etc. The tools like quadpack look all jargon to me, although it seems to be a very useful tool for many.

Following your sound suggestion, I installed R with ease, but have not been able to install RExcel (that you suggested) yet, perhaps because its installation requires a chain of other packages. For now I have to move on to my other projects. But later on, I will let you know after I figure out how to install RExcel (with all its related packages, such as statconnDCOM, etc), how to use it, and how to do the integral in R, and then how to call R's integrate straight from the spreadsheet.

Best,

In inputbox input x and n
exponential function : e^x=1+ x/1! + x^2/2! +.....x^n/n! ; n!=1*2*3...*n
inside the function we can use t(n)=x^n/n! and for recurrence formula t(n)=t(n-1)*x/n

Integrals With Exponentials

The partial sum to the n-th clause is expressed with s(n) which is ; s(n)=s(n-1)+t(n)
then e=1+s(n)
the calculation will repeat until i=n and t(n) <0.001
the problem is when i run the program the answer is no same with the exponential function above.
Sub e2()
Dim n As Double
Dim x As Double
Dim i As Double
Dim tn As Double
Dim sn As Double
Dim t1 As Double
Dim e As Double
x = CInt(InputBox('x?'))
n = CInt(InputBox('n?'))
Do
For i = 1 To n
t1 = x / (n - 1)
tn = (x / (n - 1)) * (x / n)
sn = tn + t1
e = 1 + sn
If x = 0 Then Exit For
Next i
Loop Until tn < 0.001 Or -tn < 0.001
MsgBox 'e^' & CStr(x) & '=' & CStr(e)
End Sub