6. The cumulative energy transfer is found by summing the power*time so the desired function which we call g[x] is the integral of x from time t=0 to t=x.
6. The cumulative energy transfer is found by summing the power*time so the desired function which we call g[x] is the integral of x from time t=0 to t=x.
Input :=
g[x_] = Integrate[f[t], {t, 0, x}];
Input :=
Plot[{f[x], 10 g[x]}, {x, 0, .19},
AxesLabel->{TIME,POWER/ENERGY},
PlotLabel->BATTING POWER with ENERGY [x10]];
