I unprotect the GAMMA, but still receives error:

Error, attempting to assign to `GAMMA` which is protected.  Try declaring `local GAMMA`; see ?protect for details.

Download soal.mw

What is the problem?

Hi, I'm investigating an equation of motion, and I'm attempting to plot t against different values of thetabn. I have acquired a list of my data points (in the real domain) of the form [thetabn1, t1], [thetabn2, t2] ... etc. But I am struggling to figure out how to plot it. Using dataplot gives me a graph but it is incorrect. I would like a scatterplot, ideally once I have refined my range of thetabn I would like to be able to join it up with a line to create a nice looking plot. Also any improvements to my method would be appreciated. v[i], thetavn and omegac are set variables and s[n] is my function which I am setting equal to zero, and solving for t.

with(RealDomain);
v[i] := 145000;
thetavn := (1/6)*Pi;
omegac := .1;
s[n] := v[i]*cos(thetavn)*(cos(2*thetabn)*tan(thetabn)+sin(2*thetabn)*sin(omegac*t)/omegac);
for thetabn from evalf((1/100)*Pi) by evalf((1/100)*Pi) to evalf(Pi) do assign('result', [op(result), [thetabn, solve(v[i]*cos(thetavn)*(cos(2*thetabn)*tan(thetabn)+sin(2*thetabn)*sin(omegac*t)/omegac) = 0, t)]]) end do;
dataplot(result);

Hello, I need to figure out what theta is through this matrix:

https://imgur.com/RldbcJD

Should I use a solve command for this?

MY worksheet have more than 100 parameters, now I want to use all of the parameters within a procedure, is there any easy way to introduce all these paramaters to proc without mentioning them in parentheses one by one proc(x,y,z,...)?

hello everyone,

I am trying to optimize expressions symbolically. I need to find out the maximum value possible for an variable, so that the expressoin still have a valid solution.

For Example:

expr:=a-b/b-a^3;  # a=(0,10), b=(0,10)

In this eypression b=a^3 is the only case where undefined solution is possible, for a given interval of variables

This looks fine for simple expression. But in reality there are complex equations to solve with more than 2 varibles.

1) first thing is to find out all values of a variable resulting in undeifined output(or infinite)
2) assign a symbolic value(variable < or > some value) to the variable so that the undefined result can be eliminated.

 I need to optimize the given expression so that it does not have any undefined cases when solving. I understood that when optimizing, there always be a condition on variables(in this case variable max is the condition, maximum value the variable can take). output of an expression is always a real value

OptimizedExpr:=a-b[max]/b[max]-a^3 --> b[max]>a^3 or b[max]<a^3

(it is easy to to say b[max] is not equal to a^3 , also a^3 is the limiting value. In some case it is more resonable to just ignore other part of limiting value. Hence, I would like to optimize using greaterthan or lessthan of limiting value).

I would be very glad to know how I can find Optimized expressions. I tried using the solve function but observed that expressions are equalled to zero and solving. which is completely opposite to what I was looking. I really do not know is there any way to find out undefined cases in expressions and on what varibale at what values.

I tried to explain the situation at my best and I welcome for any suggested edits or furthur information required.

Thank you

how I can determied  this integral in figure below or compute area in figure which adressed in the following website?

https://en.m.wikipedia.org/wiki/Spherical_cap

Hello everyone !

 when I use  the command   ''G1:=NonIsomorphicGraphs(5, output = graphs, outputform = adjacency)''  , I want to compute the   rank of   adjacent  matrices of 

every graph in  G1,. I try to do , but maple  retutn false:

Rank(G1);
Error, invalid input: too many and/or wrong type of arguments passed to LinearAlgebra:-Rank; first unused argument is Matrix(5, 5, {(1, 1) = 0, (1, 2) = 1, (1, 3) = 1, (1, 4) = 1, (1, 5) = 1, (2, 2) = 0, (2, 3) = 1, (2, 4) = 1, (2, 5) = 1, (3, 3) = 0, (3, 4) = 1, (3, 5) = 1, (4, 4) = 0, (4, 5) = 1, (5, 5) = 0}, datatype = integer[1], storage = triangular[upper], shape = [symmetric])

  How to achieve it , I do not konw to  invoke these adjacent matrices . Would someboby 

give me a hand. 

Thanks very much!

how I can write taylor function for following example.

I want to gain an answer similar to the image result by using taylor function.

tylor.mw
 

Download tylor.mw

Hello,

I am trying the following command:

restart; with(IntegrationTools):
simplify(int(f(x), x = 0 .. L*Ts)-Split(int(f(x), x = 0 .. L*Ts), [i*Ts, i = 0 .. L]))

Clearly the output should be 0. However, maple is not able to output the correct result. Any ideas?

Hello everyone,

I have 26 equations  and 26 variables and I want to solve them numerically. fsolve function returns whole equations as a solution.

Any advice ?

What command in Maple runs specific worksheets within other worksheet?

Actually I want to know how is it possible to comminucate and control multiple worksheets within one specific worksheet?

Hi 

I want to store the matrix m2 representing a system m2*x=b with vectors as given by the command "CompressedSparseForm" and solve the system using those vectors and b without using m2 and b.

Thanks

vectors.mw

Download vectors.mw

restart;
Digits := 15;

b := -I;

a := sqrt(2);

epsilon := 1;

f := proc (t) options operator, arrow; evalf(Int(exp(I*k*t)/((1+a^2*sin(k)^2)*(k-b)^epsilon), k = -infinity .. infinity)) end proc;

f(1.3)

I tried different methods like _d01amc, but either I have this error:

Error, (in evalf/int) NE_QUAD_NO_CONV:
  The integral is probably divergent or slowly convergent.

or it takes forever.

I also tried to map the interval to some finite length (k=tan(u)), but then I get

Error, (in evalf/int) NE_QUAD_BAD_SUBDIV:
  Extremely bad integrand behaviour occurs around the
  sub-interval (-1,5707963e+000, -1,5707963e+000 ).

disgusting integrand?

I hope to enter something like

And get "true". Mathematica and some other softwares do this but Maple returns my exact input (I'm new to Maple).

I tried using evalb and verify, but they all return false or FAIL. Is there a straightforward to verify equality and get a result of True or False in Maple?

Thanks!

Is there any way with integer programming function "LPSolve" to get all optimal solutions, because I know there is more than one, and in case if there is a lot of optimal solutions, how to show only the number of optimal solutions?

Thanks in advance!