Hi,

I have a file with arbitrary points which I want to connect with a surface. I have seen similar problems on this site but I can't fix my problem with the answers that are given, mainly because my points are just plain vectors. Can anybody help me? 
These are my points/vectors:

v1 := `<,>`(15, 6, 14.89);
v2 := `<,>`(15, 8, 14.72);
v3 := `<,>`(15, 10, 14.79);
v4 := `<,>`(15, 12, 14.95);
v5 := `<,>`(15, 14, 15.17);
v6 := `<,>`(15, 16, 15.43);
w1 := `<,>`(15/2, 4, 9.78);
w2 := `<,>`(15/2, 6, 9.95);
w3 := `<,>`(15/2, 8, 9.85); 
x1 := `<,>`(15*(1/3), 4, 8.71);
x2 := `<,>`(15*(1/3), 6, 8.44);
y1 := `<,>`(15/4, 4, 8.31); 

I can only plot the different points with 

with(plots);
pointplot3d({v1, v2, v3, v4, v5, v6, w1, w2, w3, x1, x2, y1}, scaling = CONSTRAINED, symbolsize = 20, color = red, axes = normal, labels = ["L/h", "n", "kg/m"]);

I hope someone can help me!

Good day, please how can one solve these BVPs using FINITE DIFFERENCE METHOD in maple. Here is the problem FDM.mw

Hello

I have a nasty expression which I want to simplify in terms of another expression/function I have defined. 

Please can you tell me how to do this?

A simple example would be:

myFunction := a^2 + b^2

horribleFunction:= a^2 + b^2 + ...

I want it to simplify so I get something like

A(myFunction)^n  + .....

Above is just a simplifcation to try and explain what I mean

Thanks

I'm trying to use Rodrigues' Rotation Formula to graph a circle--by rotating a point, naturally--and I'm not sure how to implement that in Maple. For something like a function, allowing a variable--say, x--to vary and produce a curve is natural, but the evalm() function doesn't handle that very well: I can use the formula to *evaluate* the rotations, but not to use them to graph the circle.

I looked for something like solids of revolution--after all, I'm doing something pretty similar--but didn't find anything helpful; apparently there's a way to make solids of revolution, but it's pretty specific and would be difficult to adapt?

I am having an issue with Physics[Vectors] in Maple 17, specifically an interference with PDEtools:-dchange. My apologies, this post is lengthy & a bit messy. I did upload a worksheet with the code; link at the end. The upload exhibits the UNWANTED behaviour in Maple 17.

Here are a few lines of code that exhibit the WANTED behaviour (change of variable and solving a de). it is run in Maple17 with Physics loaded but NOT Physics[Vectors]. The paste into Mapleprimes looks too messy to be useful so I am just showing the relevant lines; the file has everything:

-(diff(E1_(x, y, z, t), x, x))-(diff(E1_(x, y, z, t), y, y))-(diff(E1_(x, y, z, t), z, z)) = -mu*epsilon*(diff(E1_(x, y, z, t), t, t));

PDEtools:-dchange({x = r*cos(theta), z = r*sin(theta)}, -(diff(diff(E1_(x, y, z, t), x), x))-(diff(diff(E1_(x, y, z, t), y), y))-(diff(diff(E1_(x, y, z, t), z), z)) = -mu*epsilon*(diff(diff(E1_(x, y, z, t), t), t)), simplify);

subs(E1_(r, theta, y, t) = R(r)*exp(I*(-k*y+omega*t)), -((diff(diff(E1_(r, theta, y, t), y), y))*r^2+(diff(diff(E1_(r, theta, y, t), r), r))*r^2+(diff(E1_(r, theta, y, t), r))*r+diff(diff(E1_(r, theta, y, t), theta), theta))/r^2 = -mu*epsilon*(diff(diff(E1_(r, theta, y, t), t), t)));

dsolve((5));

So far this is all as expected.

Now I rerun this thing with Physics[Vectors] loaded rather than just Physics. Everything looks the same until I get to the line starting with subs(E1_ :

subs(E1_(r, theta, y, t) = R(r)*exp(I*(-k*y+omega*t)), -((diff(diff(E1_(r, theta, y, t), y), y))*r^2+(diff(diff(E1_(r, theta, y, t), r), r))*r^2+(diff(E1_(r, theta, y, t), r))*r+diff(diff(E1_(r, theta, y, t), theta), theta))/r^2 = -mu*epsilon*(diff(diff(E1_(r, theta, y, t), t), t)));

plus many more lines of expressions. I am not sure what is going wrong; but after the dchange the code behaves funky: I have had simplify producing similarly weird expressions etc.

Note that on Maple 15 this all works as expected and no issues show up for me. If the version of Physics I have on Maple 17.02 is bad; how do I change that? (I have not tried to update Physics separately, and it isn't obvious to me where to find it for Maple 17). It is sort-of an issue as I want to use this as a demo for students, who in fact will be running Maple 18... but I am stuck at 17 (and often using 15 at home) so I need this to work there (17), too.

TIA,

Mac Dude

dchangeTest.mw

Hi,

I have written a for-end loop and put all the outcomes of the loop in a matrix and now I want to plot these results but for some reason maple won't plot the matrix in a correct way. If I copy-paste the matrix into an new file maple plots it correct. What is the reason that maple won't plot it in my original file?

Here is my file. 

restart;
Parameters
L := 20; Q := 20; n := 8; h := 3; EAv := 1;
Mat := Matrix(10, 2, storage = sparse);
a := 1;
loop L1
for L1 from .6 by .1 to 1.5 do
L1 := L1;
L2 := 2*L1;
L3 := 1.6*L2;
L4 := (1/2)*L-L1-L2-L3;
alfa1 := evalf(arctan(h/L1));
alfa2 := evalf(arctan(h/L2));
alfa3 := evalf(arctan(h/L3));
alfa4 := evalf(arctan(h/L4));
F4 := (1/2)*Q*L4;
F3 := (1/2)*Q*L3+(1/2)*Q*L4+F4;
F2 := (1/2)*Q*L2+(1/2)*Q*L3+F3;
F1 := (1/2)*Q*L1+(1/2)*Q*L2+F2;
w1 := evalf((1+sin(alfa1)^3)*F1*L1/(EAv*sin(alfa1)^2*cos(alfa1)));
w2 := evalf((1+sin(alfa2)^3)*F2*L2/(EAv*sin(alfa2)^2*cos(alfa2)));
w3 := evalf((1+sin(alfa3)^3)*F3*L3/(EAv*sin(alfa3)^2*cos(alfa3)));
w4 := evalf((1+sin(alfa4)^3)*F4*L4/(EAv*sin(alfa4)^2*cos(alfa4)));
kkm := (w1-w2)^2+(w2-w3)^2+(w3-w4)^2; Mat(a, 1) := L1;
Mat(a, 2) := kkm;
a := a+1
end do;

with(plots);
pointplot(Mat);

Hi,

I have this set of equations but maple won't solve the three variables and it gives an 

Error, (in solve) cannot solve for an unknown function with other operations in its arguments. This are the equations with unknowns, alfa1, alfa2, and alfa3.

eq1 := 3*(1+sin(alfa1)^3)(30/tan(alfa1)+60/tan(alfa2)+60/tan(alfa3))/(sin(alfa1)^2*cos(alfa1)*tan(alfa1)) = 3*(1+sin(alfa2)^3)(30/tan(alfa2)+60/tan(alfa3))/(sin(alfa2)^2*cos(alfa2)*tan(alfa2));

eq2 := 3*(1+sin(alfa1)^3)(30/tan(alfa1)+60/tan(alfa2)+60/tan(alfa3))/(sin(alfa1)^2*cos(alfa1)*tan(alfa1)) = (90*(1+sin(alfa3)^3))/(sin(alfa3)^2*cos(alfa3)*tan(alfa3));

eq3 := 3/tan(alfa1)+3/tan(alfa2)+3/tan(alfa3) = 25/2;

solutions := [solve({eq1, eq2, eq3, alfa1 > 0, alfa2 > 0, alfa3 > 0}, {alfa1, alfa2, alfa3})];

Can anyone help?

So if you are given a 3x3 matrix i was just wondering how to use plot3d and plot the 3 column vectors given by it?  Thanks.

Hi all I am truing to write a maple program for Newton's Method for finding a zero of a function.  I got pretty far but I am trying to get it to list all the values not just one.  Any help would be great:

Here is  what I got:

0.2000000000

0.2016393443

0.2016396757

What I want is if I type in 2 (like the last line I showed) I want the output to show for n=0, n=1, =2.  Instead it is only showing the output just for 2.  Any help would be great thanks, Matt.  

I am trying to solve an equation by continuation method (one vairable and one parameter) containing more than 1000 terms and also hight exponents like 800. I want to get omega' values for different 'p' values.The maple file  is appended below. the link is maple_equation.mw

Many thanks in advance.

I have a worksheet. I edit some variables' value. I then execute the whole worksheet to see how the graphs change. But the graphs generated by display command do not appear. All other calculations update fine. 

To overcome this. I save worksheet with my new variable values. Close the worksheet. Reopen it. Execute it. And now the graphs appear fine.

Hi Maple-Prime-ers!

I have a system of equations, containing 18 variables and 13 equations, making this a 5 degree of freedom (DOF) system.  I would like to analytically solve each of the equations in terms of each of these DOFs.  Normally I would use solve(system, dof_variables) to accomplish this, but it doesn't return anything.  Not even [].

I can solve this system by hand.  I've included a hand-solution involving isolate() and subs() in the attached worksheet.  I'm looking to incorporate this in an optimization algorithm with varying system, so I would like an automated way of doing this.

Does anybody have any suggestions to get solve to work as intended?

3driversys_FD_BRAKE_ICE_GEN.mw

Here is the system I am talking about:

The free variables are:  {FD_T, FD_W, ICE_T, EM2_T, BRAKE_T}

I'm looking for a solution in this form:

Hi everybody,

i don't understand when i use these examples from the help:

DE1 := {diff(z(x), x) = y(x)*x, diff(y(x), x, x) = y(x)*z(x)};
DEplot3d(DE1, [y(x), z(x)], x = -2 .. 2, [[y(0) = 1, (D(y))(0) = 2, z(0) = 1]], y = -4 .. 4, obsrange = true, stepsize = 0.5e-1, iterations = 3, orientation = [-124, 72]);

and when i look on my screen i have a white cube without phase portrait so i don't understand...

Thanks! and sorry for my english i'm french...

Hi

I'm using Maple 17 on Windows 8 (64-bit).

I have noticed that when I use the 'spacecurve' command and try to display it with the 'display' command, nothing shows up. I made sure that I used 'with(plots)' and 'with(plottools)', still nothing. However 'plot3d' works fine. I think it has something to do with the version of Java I'm using but I don't know what. Any help is welcome, thx

Specifications of my laptop:

Graphics: NVIDIA Geforce GT 740m

Processor: Intel(R) Core(TM) i7-3630QM (2.40GHz)

Ram: 6,00 GB

OS: Windows 8.1

Hey Guys

I'm designing some stuff for controll theory

There I met following problem:

I want calculate the matrix A which is the product of X and G.

A is 6x6 matrix and all values in the diagonal  are ones, the rest is undefined and should be calculated

X is 6x6 diagonal matrix with the values X1...X6

and G is also 6x6 and have all these values.

now I'm stuck 'cause I haven't used Maple frequently (only some simple stuff up to now, nothing with matrices)

I'd really appreciate it, if someone can tell how to tackle this problem

Cheers