View source for Power function/Fig1


<center><asy>
import graph;
picture whole;

real sc=0.8;

draw ( graph( new real(real x) {return x;}, -2, 2), red+1.2, "$y=x$" );
draw ( graph( new real(real x) {return 2x;}, -1, 1), blue+1.2, "$y=2x$" );
draw ( graph( new real(real x) {return x/2;}, -2, 2), green+1.2, "$y=x/2$" );

xaxis(-2.1,2.1, LeftTicks(Label(fontsize(8pt)),Step=1,step=0.2,Size=2,size=1,NoZero));
yaxis(-2,2, RightTicks(Label(fontsize(8pt)),Step=0.5,step=0.1,Size=2,size=1,NoZero));
labelx("$x$",(2.3,0.25));
labely("$y$",(0.15,2.3));

add(scale(0.72sc,1.2sc)*legend(),(0.5,-0.75));

real mrg=1.3;
draw( scale(mrg)*box((-2,-2),(2,2)), white );

add (whole,shift(-sc*230,0)*currentpicture.fit(sc*mrg*6.5cm));
erase();


draw ( graph( new real(real x) {return 1/x;}, -4, -0.25), red+1.2, "$y=1/x$" );
draw ( graph( new real(real x) {return 1/x;}, 0.25, 4), red+1.2 );
draw ( graph( new real(real x) {return 2/x;}, -4, -0.5), blue+1.2, "$y=2/x$" );
draw ( graph( new real(real x) {return 2/x;}, 0.5, 4), blue+1.2 );
draw ( graph( new real(real x) {return 1/(2x);}, -4, -0.125), green+1.2, "$y=1/(2x)$" );
draw ( graph( new real(real x) {return 1/(2x);}, 0.125, 4), green+1.2 );

xaxis(-4.2,4.2, LeftTicks(Label(fontsize(8pt)),Step=2,step=0.5,Size=2,size=1,NoZero));
yaxis(-4,4, RightTicks(Label(fontsize(8pt)),Step=1,step=0.2,Size=2,size=1,NoZero));
labelx("$x$",(4.6,0.5));
labely("$y$",(0.3,4.6));

add(scale(0.75sc,0.75sc)*legend(),(0.95,-1.2));

real mrg=1.3;
draw( scale(mrg)*box((-4,-4),(4,4)), white );

add (whole,shift(0,0)*currentpicture.fit(sc*mrg*6.5cm,mrg*6.5cm,false));
erase();


draw ( graph( new real(real x) {return x^3;}, -4^(1/3), 4^(1/3)), red+1.2, "$y=x^3$" );
draw ( graph( new real(real x) {return x^2;}, -2, 2), blue+1.2, "$y=x^2$" );
draw ( graph( new real(real x) {return sqrt(x);}, 0, 4), green+1.2, "$y=x^{1/2}$" );
draw ( graph( new real(real x) {return -sqrt(x);}, 0, 4), green+1.2 );

xaxis(-4.2,4.2, LeftTicks(Label(fontsize(8pt)),Step=2,step=0.5,Size=2,size=1,NoZero));
yaxis(-4,4, RightTicks(Label(fontsize(8pt)),Step=1,step=0.2,Size=2,size=1,NoZero));
labelx("$x$",(4.6,0.5));
labely("$y$",(0.3,4.6));

add(scale(0.5sc,0.75sc)*legend(),(0.6,-2.5));

real mrg=1.3;
draw( scale(mrg)*box((-4,-4),(4,4)), white );

add (whole,shift(sc*230,0)*currentpicture.fit(sc*mrg*6.5cm,mrg*6.5cm,false));
erase();

shipout(whole);
</asy></center>