Line 3: | Line 3: | ||
<PRE> | <PRE> | ||
with(plots): | with(plots): | ||
− | implicitplot( x^2/9 + y^2/4, x=-4..4, y=-3..3 ); | + | implicitplot( x^2/9 + y^2/4 = 1 , x=-4..4, y=-3..3 ); |
plot( [3*cos(t),2*sin(t), t=0..2*Pi] ); | plot( [3*cos(t),2*sin(t), t=0..2*Pi] ); | ||
p1 := plot( [3*cosh(t),2*sinh(t), t=-2..2] , [-3*cosh(t),2*sinh(t), t=-2..2], color=red ): | p1 := plot( [3*cosh(t),2*sinh(t), t=-2..2] , [-3*cosh(t),2*sinh(t), t=-2..2], color=red ): | ||
− | p2 := plot( { (2/3)*x, -(2/3)*x }, x=-11..11 ): | + | p2 := plot( { (2/3)*x, -(2/3)*x } , x=-11..11 ): |
display( {p1,p2} ); | display( {p1,p2} ); | ||
− | f := x -> (8/Pi) * sum( ((-1)^(n+1)/(2*n-1)^2)*sin(( | + | f := x -> (8/Pi) * sum( ((-1)^(n+1)/(2*n-1)^2)*sin((2*n-1)*x), n=1..20 ); |
plot( f(x), x=0..Pi ); | plot( f(x), x=0..Pi ); |
Revision as of 08:10, 4 December 2008
Here's a place where we can list our favorite MAPLE commands.
with(plots): implicitplot( x^2/9 + y^2/4 = 1 , x=-4..4, y=-3..3 ); plot( [3*cos(t),2*sin(t), t=0..2*Pi] ); p1 := plot( [3*cosh(t),2*sinh(t), t=-2..2] , [-3*cosh(t),2*sinh(t), t=-2..2], color=red ): p2 := plot( { (2/3)*x, -(2/3)*x } , x=-11..11 ): display( {p1,p2} ); f := x -> (8/Pi) * sum( ((-1)^(n+1)/(2*n-1)^2)*sin((2*n-1)*x), n=1..20 ); plot( f(x), x=0..Pi );
See also Bell's MAPLE Tutorial.