MaplePrimes Questions

Hello,

I have this list :
T:=[alpha(t),beta(t)]

I would like to create this list automatically:

Tmod:=[alpha_,beta_]

In other words, how can I remove the 3 characters "(t)" and replace it by "_"

Do you have ideas to do so ?

Thanks a lot for your help

I tried to solve a system of two equations using fsolve in Maple, however Maple didn't return any result (yet there is the result of that equation's system):

Maple is returning the command if there are no roots but that isn't my case.

How can I obtain the result in Maple?

worksheet.mw

solution of system of differential equations

is {a(t) = 1, b(t) = exp(t), c(t) = 0}

1 = exp(t), since t = 0, is characteristic equation = (y-0)?
0 = exp(t), how to find this characteristic equation when division is zero?
exp(t) = exp(t), is characteristic equation = (y-t)?

after solved, 

diff(a(t), t) = diff(a(t), t)

diff(b(t), t) = 0

diff(c(t), t) = -b(t)/c(t)

 

there is a diff(a(t), t) term 

how to plot this kind of system?

can diff(a(t), t) be ignore so that only consider two equations, diff(b(t),t) and diff(c(t),t) ?

if so, i use below to plot, it can not show the arrow clearing , i can only see arrow near origin, but not far point

with(plots):
fieldplot([0, y/x], x = -2 .. 2, y = -2 .. 2);
fieldplot([0, y/x], x = -2 .. 2, y = -2 .. 2, arrows = SLIM,grid = [1, 1]);
fieldplot([0, y/x], x = -10 .. 10, y = -10 .. 10);

 about how to calculate vector field of system of 3 differential equations which in terms of a(t), b(t), c(t) , diff(a(t),t), diff(b(t),t), diff(c(t),t)?

is the only method is the express diff(a(t),t), diff(b(t),t), diff(c(t),t) in terms of a(t), b(t), c(t) ?

for example 

<diff(a(t),t), diff(b(t),t), diff(c(t),t)>

if result is

diff(a(t),t) = a(t)*b(t)

diff(b(t),t) =b(t)*c(t)

diff(c(t),t) =c(t)*a(t)

<a(t)*b(t), b(t)*c(t), c(t)*a(t)>

then

is it the vector field <a*b, b*c, c*a> ?

 

When I put maximize(cos(t)), everything is fine.

When I put maximize(cos(Pi)), everything is fine.

When I put maximize(cos(t*Pi)), it says invalid limiting point??? What went wrong?

 

Suppose I have a function like this: f=cos(2t/m)+cos(2(t+5)/m).

 

Now for each fixed m, we get the maximum value of f. Then I want to build a plot where x-axis is m and y-axis is f, how could I do that? Please help!

 

Hello,

I want to solve a optimization problem with maple/maplesim.

A car has to move a defined distance on a plane, straight road in a defined time. Given is the mass of the car, the maximum force to accelerate the car, the distance and the time. The rolling resistance and the drag force should be considered. At start-point speed v = 0m/s and also at the end-point speed should be v= 0m/s.

So there are the following model parameters:

mass                            m = 2000kg
distance                        d  = 1000m
time                              t_max = 120s
                                    v_0 = 0m/s
                                    v_d = 0m/s
accelerating force           -1m/s2 <= F_acc/m <= 1m/s2
resistance to rolling        F_rol = C + A*v2                      C and A are later defined
resulting force at mass   F_res = F_acc - F_rol

The energy consumption  integral F_acc(s) ds (from 0 to d) should be minimized and I want to print the graph of F_acc(s) 

How can or can Maple help me solving this optimization problem?

 

 

Can we get it in MapleSim, not in exactly this form, but in substance? (Not in Maple)
The line of intersection of surfaces:
(x1-0.5) ^ 4 + x2 ^ 4 + x 3 ^ 4-1. ^ 2 = 0.;
x1 ^ 2 + (x2-0.25) ^ 2 + x3 ^ 2-1. ^ 2 = 0.;
(Red) rotates about an axis oX3. During rotation, the line intersects with the fixed sphere ((0., 1.5, 0 .5); R = 1.725). One of the points of intersection is drawn in green. Green Dot and the center of the sphere connected to the blue segment.  In the sphere  of  fixed  trajectory of  the green point.
In other words, the geometric model  3d  cam mechanism and its kinematics.


I'm looking for the 3-D integral formulae for Convolution, and Cross Correlation, between pairs of functions, which are each in spherical polar coordinates, for implementation in a MAPLE worksheet. Each function is normalized and symmetric around the origin.

Thank you for your consideration.

 

``

``

M := diff(T(r), r, r)+(diff(T(r), r))/r+u*(-8*B*U+N)*T(r)+P*(r^4+r^2) = 0

diff(diff(T(r), r), r)+(diff(T(r), r))/r+u*(-8*B*U+N)*T(r)+P*(r^4+r^2) = 0

(1)

``

dsolve(M)

T(r) = BesselJ(0, (-8*B*U*u+N*u)^(1/2)*r)*_C2+BesselY(0, (-8*B*U*u+N*u)^(1/2)*r)*_C1+64*P*(1+(r^2+1)*(B*U-(1/8)*N)^2*r^2*u^2+2*(B*U-(1/8)*N)*(r^2+1/4)*u)/(u^3*(8*B*U-N)^3)

(2)

``

ics := (D(T))(0) = 0

(D(T))(0) = 0

(3)

``

dsolve({M, ics})

T(r) = 64*P*(1+(r^2+1)*(B*U-(1/8)*N)^2*r^2*u^2+2*(B*U-(1/8)*N)*(r^2+1/4)*u)/(u^3*(8*B*U-N)^3)

(4)

``

 

Download nonhomogeneous_Solution.mwnonhomogeneous_Solution.mw

 

Hi everybody,

I want to solve this nonhomogeneous equation. Please tell me if it is true? I'm sure the BesselJ will not be disapper when the boundary condition is exerted... But the final solution showes the opposite one. BesselY must be disappear, because the boundary condition says in r=0, the solution is finite....

 

Thanks a lot.

 

sys := {diff(b(t),t) = 0,diff(c(t),t) = -b(t)/a(t)};
DEplot(sys, [b(t),c(t)], t=0..5, x=-5..5, y=-5..5);
Error, (in DEtools/DEplot) Option keyword (x) was not in the allowed set of options, consisting of: iterations, arrows, dirgrid, obsrange, scene, colour, linecolour, stepsize, a dependent variable range, a list of initial conditions or one of the allowed plot options: {animate, axes, color, colour, coords, font, scaling, style, symbol, title, view, animatecurves, animatefield, axesfont, dirfield, labelfont, linestyle, numframes, resolution, thickness, tickmarks, titlefont, xtickmarks, ytickmarks}, or one of the allowed dsolve/numeric options: {abserr, control, ctrl, initial, itask, maxder, maxfun, maxkop, maxord, maxpts, maxstep, method, mi..

diff(a(t), t) = diff(a(t), t);
diff(b(t),t) = 0;
diff(c(t),t) = -b(t)/a(t);

[diff(rhs(sol[1][2]), a(t)),diff(rhs(sol[1][2]), b(t)),diff(rhs(sol[1][2]), c(t))];
Error, (in VectorCalculus:-diff) invalid input: diff received a(t), which is not valid for its 2nd argument

 

 

hey guys Im new client in maple and today I was about check out the resualt of my mathematic quastion with maple.

I need a step by step solution and exact command to give me true resualts 

for example 

how can I expand a factorization like (x^2-y^2) to (x-y)(x+y)

in a little more  complicated form (cd-1)^2-(c-d)^2/(d^2)(c-1)=5 the value of c=?

for solve this problem I need to expand (cd-1)^2-(c-d)^2 than other expands & in the end value of c

I dont have anymore time for my mathemathic exam so know that how maple works in basic and intermadiate mathematic level is important to me

thank you guys

 

 

eq2 := b(t)*(diff(c(t), t))*(diff(a(t), t))+b(t)*(diff(a(t), t))+a(t)*(diff(c(t), t));
eq3 := a(t)*(diff(b(t), t))(diff(a(t), t))+b(t)*(diff(b(t), t))*(diff(c(t), t));
eq4 := b(t)*(diff(c(t), t))(diff(b(t), t))+a(t)*(diff(b(t), t))+b(t)*(diff(c(t), t));
dfieldplot([eq2,eq3,eq4],[t,x],t=0..5,a=-5..5,b=-5..5,c=-5..5);
dfieldplot([eq2,eq3],[t,x],t=0..5,a=-5..5,b=-5..5);
eq2a := eval(subs(c(t)=exp(t), eq2));
eq3a := eval(subs(c(t)=exp(t), eq3));
eq4a := eval(subs(c(t)=exp(t), eq4));
dfieldplot([eq2a,eq3a], [a(t), b(t)], t = -5 .. 5, a = -5 .. 5, b = -5 .. 5, arrows = SLIM, color = black, dirfield = [10, 10]);

First 1156 1157 1158 1159 1160 1161 1162 Last Page 1158 of 2428