Items tagged with solve

I want to solve the problem described below. I tried using two methods as shown below, each method has been runing for days without solving it. I will really appreciate your help.

 
Thanks for your help.

 

Det1 := (1/256)*(Aiso*(c+t)^2*(a^2+b^2)*(mu-1)*Pi^2-4*a^2*b^2*c*Gc)*(16*Aiso^2*Do^2*(c+t)^4*(a^2+b^2)^6*Pi^12+10*(a^2+b^2)^5*((c+t)^2*Aiso+4*Do)*Gc*(c+t)^2*c*a^2*Do*b^2*Aiso*Pi^10+(a^2+b^2)^4*((c+t)^2*Aiso+4*Do)^2*Gc^2*c^2*a^4*b^4*Pi^8-(1024/81)*a^6*Aiso^2*b^6*Tcr^2*(c+t)^4*(a^2+b^2)^2*Pi^4-(2560/81)*a^8*Aiso*b^8*c*Gc*Tcr^2*(c+t)^2*(a^2+b^2)*Pi^2-(1024/81)*a^10*b^10*c^2*Gc^2*Tcr^2)*(Aiso*(c+t)^2*(a^2+4*b^2)*(mu-1)*Pi^2-4*a^2*b^2*c*Gc)*(Aiso*(c+t)^2*(a^2+b^2)*(mu-1)*Pi^2-a^2*b^2*c*Gc)*(16*(c+t)^4*(a^2+(1/4)*b^2)^3*Do^2*(a^2+4*b^2)^3*Aiso^2*Pi^12+(10*(a^2+b^2))*((c+t)^2*Aiso+4*Do)*Gc*(c+t)^2*(a^2+(1/4)*b^2)^2*c*a^2*Do*(a^2+4*b^2)^2*b^2*Aiso*Pi^10+((c+t)^2*Aiso+4*Do)^2*Gc^2*(a^2+(1/4)*b^2)^2*c^2*a^4*(a^2+4*b^2)^2*b^4*Pi^8-(1024/81)*(c+t)^4*(a^2+(1/4)*b^2)*Tcr^2*a^6*(a^2+4*b^2)*b^6*Aiso^2*Pi^4-(2560/81)*a^8*Aiso*b^8*c*Gc*Tcr^2*(c+t)^2*(a^2+b^2)*Pi^2-(1024/81)*a^10*b^10*c^2*Gc^2*Tcr^2)*((mu-1)*(c+t)^2*(a^2+(1/4)*b^2)*Aiso*Pi^2-a^2*b^2*c*Gc)/(b^20*a^20*(c+t)^16) = 0;

 

# method 1;
EQN := RootOf(Det1, Tcr);

EQN_2 := allvalues(EQN);

# method 2;

EQN := solve(Det1, Tcr);

Hello I have the following small piece of code.

XMLTools[Print](MathML[Export]('sin(theta)'=0.25));

which exports sin(theta)=.25, how do I force the 0 to display.

 

Also

why does the following fail:

sol:=solve([cot(x)=2,x>=0,x<2*Pi],x,AllSolutions, Explicit);

How do I get a system solve to dispaly an ordered triple and not {x=ans, y=ans, z=ans}

for instance

sys := { z = 4, x+y= 10, x-y = 5 };
L:=solve(sys, {x,y,z} );

displays

{x=7.5, y=2.5, z=4}

I want 

{7.5,2.5,4}

Hi All

I have the following line of code in Maple:

solve([sin(t), 0 < t, t < 6.28], t, allsolutions, explicit)

it produces: "{t = Pi}, {t = 2*Pi}, {t = 3*Pi}, {t = 4*Pi}, {t = 5*Pi}, {t = 6*Pi}, {t = 7*Pi}"

How do I get it to simply produce: "{Pi,2*Pi,2*Pi,3*Pi,4*Pi,5*Pi,6*Pi,7*Pi}

as having the variable listed is redundant and annoying when you want to go on and extract the 3rd solution (number only) form the list.

Thanks in advance.

hello,

I am trying to solve a set of equations using solve but it didn't get me any answer !

> eq1 := x[1]-x[2] = 0;
> eq2 := -x[1]+2*x[2]-x[3] = 0;
> eq3 := -x[2]+2*x[3]-x[4] = 0;
> eq4 := -x[3]+x[4]-t = 0;
> solve({eq1, eq2, eq3, eq4}, {x[1], x[2], x[3], x[4]});

there is no error massage or anything.

any help?

thank you,

Mahdi

 

 

hi--how i can solve following equation?

thanks

 

Eq.mw


Maple Worksheet - Error

Failed to load the worksheet /maplenet/convert/Eq.mw .
 

Download Eq.mw

 

When I use Maple solve on functions that involves exp, ln to decide the maxima, minima points by solving derivative equals zero, it only returns the first point, not the second point.

Which by definition it shall return two points, one at 2.030837315, the other around 6.7.

See the Maple code and exported PDF attached.

Maple_Solve_MinMaxma.mw

Maple_Solve_MinMaxma.pdf

i want to solve the system of equation ( 1 )  , (2)  ,  (3)   under the assumation that x , y have the CDF in (4)  ,  (5)
 

diff(L(lambda[1], lambda[2], alpha), lambda[1]) = n/lambda[1]+sum(x[i], i = 1 .. n)-(sum(2*x[i]*exp(lambda[1])/(exp(x__i*`&lambda;__1`)-1+alpha), i = 1 .. n))

diff(L(lambda[1], lambda[2], alpha), lambda[1]) = n/lambda[1]+sum(x[i], i = 1 .. n)-(sum(2*x[i]*exp(lambda[1])/(exp(x__i*`&lambda;__1`)-1+alpha), i = 1 .. n))

(1)

diff(L(lambda[1], lambda[2], alpha), lambda[2]) = m/lambda[2]+sum(y[j], j = 1 .. m)-(sum(2*y[j]*exp(lambda[2])/(exp(y__j*`&lambda;__2`)-1+alpha), j = 1 .. m))

diff(L(lambda[1], lambda[2], alpha), lambda[2]) = m/lambda[2]+sum(y[j], j = 1 .. m)-(sum(2*y[j]*exp(lambda[2])/(exp(y__j*`&lambda;__2`)-1+alpha), j = 1 .. m))

(2)

diff(L(lambda[1], lambda[2], alpha), alpha) = (n+m)/alpha-(sum(2/(exp(x[i]*`&lambda;__1`)-1+alpha), i = 1 .. n))-(sum(2/(exp(y[j]*`&lambda;__2`)-1+alpha), j = 1 .. m))

diff(L(lambda[1], lambda[2], alpha), alpha) = (n+m)/alpha-(sum(2/(exp(x[i]*`&lambda;__1`)-1+alpha), i = 1 .. n))-(sum(2/(exp(y[j]*`&lambda;__2`)-1+alpha), j = 1 .. m))

(3)

G(x, lambda[1], alpha) = 1-alpha/(exp(lambda[1]*x)-1+alpha)

G(x, lambda[1], alpha) = 1-alpha/(exp(lambda[1]*x)-1+alpha)

(4)

G(y, lambda[2], alpha) = 1-alpha/(exp(lambda[2]*x)-1+alpha)

G(y, lambda[2], alpha) = 1-alpha/(exp(lambda[2]*x)-1+alpha)

(5)

``

``


 

Download internet.mw

how will i go about solving this problem, i want to return somthing like this (this anwser is from another function that did not contain sin, and therefor did not gave me problems).

thx in advance
 

Hey there folks - I have the following headcracker...

I have 2 equations:

                    cos(a t) = cos(b t + c)
    &   
                    sin(a t) = sin(b t + c)
 

Where a, b and c are known constants, and t is a variable.

I would like to find a way to solve these 2 equations simultaneously, i.e. find the t values that solve both equations at the same time. Of course, there will be an infinite number of solutions, so I also need a way to define an interval that t needs to be restricted to, e.g. t = 0..20 * Pi .

The best I've managed is:
 

   ... but I can't seem to make this work for solving the 2 trig. equations simultaneously

nor can I figure out the syntax for getting all solutions compiled as a list, e.g.

- which would be enormously helpful for further calculations.

Can anyone give some help on this?

Regards,  Matthew

Morning all,

I repeatedly solve (command solve) a collection of systems of inequalies. Some of them can have no solution, but I am able to check if a solution has been found or not, and then take some decision about the system in question.

I have placed a few print commands at different critical locations within the loop where those systems are constructed and possibly solved.
Every time solve fails finding a solution it returns me a "no solution found" warning.
In order to keep my printings readable, could it be possible to avoid those warnings ?
Is there some "try & catch" like mechanism to manage warnings ?

Thank you all in advance

 

I've encountered a very strange issue with Maple.

The result returns differently with solve and fsolve after/before a variable is given a certain value. See attachment.

The result comes from solve (with variable epsilon) returns value of the same variable with imaginary part while the fsolve returns the correct answer.

Now how can I achieve the same result as fsolve via solve?

Thanks!

Maple_Question_Solve_Fsolve.mw

Maple_Question_Solve_Fsolve.pdf  (exported PDF from Maple)

I need some help. I'm trying to solve this system of equations, but maple says the solutions may have been lost. Here are the equations:

phi := alpha+theta;
sigma := b*c/(2*pi*r);
f := 2*arccos(exp(-(1/2)*b*(1-r/R)*R/(r*sin(phi))))/pi;
d := 4*f*sin(phi)*(cos(phi)-lambda*sin(phi))/(sigma*(sin(phi)+lambda*cos(phi)));
e := .1152*alpha+.6634;
x := solve(d = e, alpha)
 
I am trying to solve for alpha by setting d = e. Any help  would be greatly appreciated.
 

Hey there!

I wonder how i can solve the following using maple.

I got an equation containting 2 variables; x and T.

 

I want to plot x versus T, with the range of T from 300 to 800.

How can I do this? 

This is the formula I am talking about:

(1/4)*x(3-2*x)^2/(1-x)^3 = 18325.73901+exp(36.58420421-10902.09286/T)

 

Thanks in advance!

Kind regards,

Geard

 

The problem I am trying to solve requires a significant amount of computation time. I am unaware if a solution to the problem exists. If a solution does exist, I only need one solution, not the set of every possible solution. Is there a way to restrict the solve function such that when (if) one solution is found, the computation halts and the solution is outputted?

1 2 3 4 5 6 7 Last Page 1 of 54