Mathematica Tool 2

This Mathematica file is written to accompany Section 2.4. It is configured to find a value of L(b) by zoom in to find the slope of (b^t) at t=0.

Enter the base for the exponential function (b^t) (initially set to 2).

b=2;
f[t_]:=(b^t)

Now enter a half-width q of the zoom box. The function will be graphed from - qto q. When q is small enough, you should be able to estimate the slope at t = 0.
Plot the function f  from -q to q.

q=1;
Plot[f[t],{t,-q,q},PlotStyle->{Red},AxesLabel->{t,None},AxesOrigin->{0,f[0]-(q/2)}]