Consider:
f[x_] := (1 + x)^(1/x);
Manipulate[
Plot[f[x], {x, -eps, eps}],
{{eps, 0.00001}, {1, .1, .01, .001, .0001, .00001, .000001},
ControlType -> SetterBar}]
Which gives this image.
How can I double the number of digits used in the labels for the tick marks on the vertical axis? And how can I replace the scientific notation in the last setter bar choice to pure decimal (i.e..000001)?