rlopez

2468 Reputation

12 Badges

14 years, 312 days

Dr. Robert J. Lopez, Emeritus Professor of Mathematics at the Rose-Hulman Institute of Technology in Terre Haute, Indiana, USA, is an award winning educator in mathematics and is the author of several books including Advanced Engineering Mathematics (Addison-Wesley 2001). For over two decades, Dr. Lopez has also been a visionary figure in the introduction of Maplesoft technology into undergraduate education. Dr. Lopez earned his Ph.D. in mathematics from Purdue University, his MS from the University of Missouri - Rolla, and his BA from Marist College. He has held academic appointments at Rose-Hulman (1985-2003), Memorial University of Newfoundland (1973-1985), and the University of Nebraska - Lincoln (1970-1973). His publication and research history includes manuscripts and papers in a variety of pure and applied mathematics topics. He has received numerous awards for outstanding scholarship and teaching.

MaplePrimes Activity


These are answers submitted by rlopez

RJL Maplesoft

My first suggestion would be to use the animate command. For example, try something like

animate(plot,[t*(4-x^2),x=-2..2],t=0..10);

The animate command (in the plots package) will animate plots created by plotting functions. These functions can be built-in plot commands such as plot or plot3d, or they can be user-defined procedures that result in a plot structure. The command is pretty robust, and has a lot of built-in features that are tedious to reproduce when building an animation with display/insequence=true.

Mixing 2d and 3d plots requires more care. In fact, you can't. You have to "elevate" the 2d plot to a 3d plot. The typical technique I've used for this is via the transform command from the plottools package. One uses this command to define a function whose job is to change each 2d point in the 2d plot structure to an equivalent 3d point. So, suppose you had a 2d plot structure whose name was Q, and which generated the graph of a curve in the plane. If you want this curve to appear in the z=0 plane in a 3d plot called R, execute f := transform((x, y) -> [x, y, 0]):

Then, join the plots of Q and R with display([R, f(Q)])

For the rest, it's not exactly clear what you want to do. I have this vague sense that perhaps you want to animate a series or set of disturbances resembling stones dropped into a lake. Not sure, so perhaps this needs some iteration on your part.

RJL Maplesoft

Specifically coded for such applications, the command convert(expr,phaseamp) is a more powerful (and convenient) alternative.

This is a remarkably smart conversion, as it will find all instances of the desired structure, even if there are multiple pairs of sine/cosine functions in the mix. It's much more powerful than using solve/identity, which fails in many instances: For example, if the trig functions are multiplied by a common exponential, or the coefficients are symbolic, not numeric, etc.

 

RJL Maplesoft

By design, the VectorCalculus package computes the differential operators Divergence, Curl, Gradient, and Laplacian only in orthogonal coordinates.  It uses scale factors, and that works only with orthogonal systems.  However, Maple's plot package can draw graphs for non-orthogonal systems, so there is this option in VectorCalculus to add a non-orthogonal system for the purpose of graphing, but not for computing.

To obtain the gradient in non-orthogonal systems, you would need the Tensor subpackage of the DifferentialGeometry package. In essence, such a gradient must be computed via the covariant derivative, which is the generalization of the directional derivative. In multivariate calculus, one meets the directional derivative of a scalar. When this derivative exists, it can be computed by taking the dot product of the gradient vector with the direction vector. Well, when you ask for a directional derivative of a vector field, you first need to generalize the gradient vector. This generalization is the "covariant derivative." Dotting the covariant derivative with the direction vector then produces the directional deriavtive of the vector field.

So, what does a covariant derivative look like? In this case it would be a rank-2 tensor. This object can be represented as a matrix - its components can be organized into a matrix format. Then, matrix multiplication with a vector can be used to compute the equivalent of the summation process that's lurking in the tensor calculus.

If you really need to learn this stuff, I suggest you read the Reporter Article "Classroom Tips and Techniques: Tensor Calculus with the Differential Geometry Package" that's now in the Maple Application Center at the end of the following link.

http://www.maplesoft.com/applications/view.aspx?SID=33840

Alternatively, go to the Application Center, and search for articles by Robert Lopez. There are at least 50, but the one I'm suggesting is in the list.

 

The file 11412_eigenvector.mw does not contain a 3x3 matrix.  I tried writing a matrix of the coefficients of u[1],v[1],w[1] in the vector given in that file, but the eigenvalues of the resulting matrix do not match the -6.908 value in the file.

Essentially, the question is pretty opaque, and should be further clarified by the proposer.

RJL Maplesoft

RJL Maplesoft One advantage of the worksheet is that you can single-step through a sequence of Maple commands, with the cursor moving automatically to the next prompt. This does not happen in Document mode. In fact, after hitting the Enter key to execute a command in document mode, the cursor moves to the next blank document block. Further use of the Enter key just generates new empty document blocks, so if you are in class working through a sequence of calculations, you have to use the mouse to move to the next executable command in Document mode. One blend of the technologies is to use a worksheet, but to capture the commands in 2D math. These commands can either be written in 2D math, or converted to 2D math from 1D. In fact, experienced users of Maple who demonstrate sequential calculations for students can write a worksheet much as they would have done in earlier versions of Maple, then convert the 1D input to 2D input for the mathematical clarity that such input often permits. In my 15 years of using Maple in the classroom, I was in worksheet mode with 1D math. After my retirement, it took a bit of time, but I morphed my style to worksheet with 1D for creation, with converson to 2D for a better view of the mathematics being expressed by the command. A student who wants to see the underlying 1D math input can revert the change via context menu. I haven't yet used the Document mode to write a mathematical paragraph that captures live calculations within the sentences of the paragraph. That's what I see as one of the two basic functionalities of the Document mode. The other is as a workspace for free-form drag-and-drop point-and-click syntax-free calculations. This can be done in a worksheet, too, but it feels more efficient to me done in a Document.
RJL Maplesoft The following commands will result in a graph of the surface, its tangent plane at (1,1,1), and the normal line through (1,1,1). However, this isn't a "directional derivative" issue per se. It might arise while studying the meaning of the directional derivative, but in itself, the construction does not require the concept of "directional derivative." with(VectorCalculus): BasisFormat(false): with(plots): q := x*y+y*z+z*x-3; V := Gradient(q,cartesian[x,y,z]); N := evalVF(V,<1,1,1>); L := <1,1,1>+t*N; Z := solve(q,z); TPZ := mtaylor(Z,[x=1,y=1],2); p1 := implicitplot3d(q=0,x=-1..3,y=-1..3,z=-1..3): p2 := plot3d(TPZ, x=0..2,y=0..2): p3 := spacecurve(L,t=-1/2..1/2, color=black, thickness=2): display([p||(1..3)], scaling=constrained, axes=box);
For example, to apply the ratio test to the series Sum(1/2^n, n=0..infinity), define > a := n -> 1/2^n: > 'a'[n] = a(n); then compute > r = limit(a(n+1)/a(n), n=infinity); We suggest two lines to define a[n]. The first defines it as a functin of n, the second displays it more naturally. The left side of the output of the second line appears as a[n], whereas the right side appears as 1/2^n. Similar computations apply to the nth-root test, etc. There is no single command for determining the convergence or divergence of a series. If the whole series is entered as > S := Sum(1/2^n, n=0..infinity); then the command > value(S); will produce a finite result, in which case it's clear the series converged. If Maple can determine the series diverges, it will return the symbol "infinity" or -infinity. If Maple returns unevaluated, it means that Maple could not determine a limit for the partial sums, but that does not mean such a limit does not exist. It only means that Maple couldn't determine that limit. There is no single command in Maple for writing the general term in a series. The taylor (or series) commands produce a partial sum, with the terms written out (not in in sigma-notation). However, the nth derivative of an expression can be computed. Hence, it is possible to build the general form of a series expansion. For example, to obtain the general expansion of sin(x) at x = 0, implement the following commands. > q := eval(diff(sin(x),x$n)/n!, x=0); > q1 := simplify(eval(q, n=2*k+1)) assuming k::posint; The first command produces sin(n*Pi/2)/n! whereas the second produces (-1)^k/(2*k+1)!. User insight and intervention is definitely needed here! The requisite Maclaurin expansion is then obtained with > Sum(q1*x^(2*k+1), k=0..infinity); The Share Library, a repository for code contributed by users, contained the FPS package with its FormalPowerSeries command. This command would return the formal power series in sigma notation. However, the Share Library is no longer available.
First 20 21 22 Page 22 of 22