MaplePrimes Questions

Hello!

I am trying to find a minimizer for the functional E (see Maple code), where u is in L2([0,rmax]) (Constraint) and u is approximated by a finite set of fourier coefficients in the basis {n*exp(ikx)}.

I don't have much expirience with maple so I could use some help solving this.

The codes I tried either show an erroer( unexpected parameters) or run a very long time until I interupt.

Do I have something wrong or can I reformulate the problem?

Thank you!

Kainmuth

 

Minimizetest2.mw
 

restart

``

with(Optimization);

[ImportMPS, Interactive, LPSolve, LSSolve, Maximize, Minimize, NLPSolve, QPSolve]

(1)

rmax := 20;

20

(2)

n := 1/sqrt(rmax);

(1/10)*5^(1/2)

(3)

const := abs(c1)^2+abs(c2)^2+abs(c3)^2 = 1;

abs(c1)^2+abs(c2)^2+abs(c3)^2 = 1

(4)

f := proc (x) options operator, arrow; n*c1+n*c2*exp(I*x)+n*c3*exp((2*I)*x) end proc;

proc (x) options operator, arrow; n*c1+n*c2*exp(I*x)+n*c3*exp((2*I)*x) end proc

(5)

E := proc (c1, c2, c3) options operator, arrow; int(abs(diff(f(x), x))^2, x = 0 .. rmax)+.5*(int(abs(f(x))^2*w(x-y)*abs(f(y))^2, x = 0 .. rmax)) end proc;

proc (c1, c2, c3) options operator, arrow; int(abs(diff(f(x), x))^2, x = 0 .. rmax)+.5*(int(abs(f(x))^2*w(x-y)*abs(f(y))^2, x = 0 .. rmax)) end proc

(6)

Optimization:-Minimize(E(f(x)), const);

Warning,  computation interrupted

 

``


 

Download Minimizetest2.mw

 

Is there any way to get random numbers in Maple with the Sobol method?

Thank you.

How to make Maple determine whether the following is a sequence with a rule behind it or just random fractions:

3^893/2^1415, 3^1040/2^1648, 3^2192/2^3474, 3^3776/2^5984, 3^3910/2^6197, 3^5514/2^8739

equation of ellipse

eqn := (1/32)*(x-16)^2+(1/2025)*(y+0)^2 = 1

only interested in the positive section

plots[implicitplot]([(1/32)*(x-16)^2+(1/2025)*(y+0)^2 = 1], x = 0 .. 18, y = 0 .. 60, scaling = constrained)

equation for arch length of function

int(sqrt(1+(diff(eqn, x))^2), x = 0 .. 16)

Doesn't seem like the best way to solve this.

Wanting to generate a general fomula I can then use in excel to calculate the arch length of the positive only section of the ellipse

any ideas of what the assumptions could be to have maple solve this?

 

eqn2 := (x-h)^2/a^2+(y-k)^2/b^2 = 1;
                               2          2    
                        (x - h)    (y - k)     
                eqn2 := -------- + -------- = 1
                            2          2       
                           a          b        
                             "(->)"

     [[                                            (1/2)]  
     [[          / 2  2    2  2      2        2  2\     ]  
     [[    a k + \a  b  - b  h  + 2 b  h x - b  x /     ]  
     [[y = ---------------------------------------------], 
     [[                          a                      ]  

       [                                            (1/2)]]
       [          / 2  2    2  2      2        2  2\     ]]
       [    a k - \a  b  - b  h  + 2 b  h x - b  x /     ]]
       [y = ---------------------------------------------]]
       [                          a                      ]]

eqn3 := (a*k+sqrt(a^2*b^2-b^2*h^2+2*b^2*h*x-b^2*x^2))/a;
                                                     (1/2)
                   / 2  2    2  2      2        2  2\     
             a k + \a  b  - b  h  + 2 b  h x - b  x /     
     eqn3 := ---------------------------------------------
                                   a                      
diff(eqn3, x);
                           2        2                
                        2 b  h - 2 b  x              
          -------------------------------------------
                                              (1/2)  
            / 2  2    2  2      2        2  2\       
          2 \a  b  - b  h  + 2 b  h x - b  x /      a
`assuming`([int(sqrt(1+(diff(eqn3, x))^2), x = c .. d)], [a > 0, b > 0, c >= 0, d > c]);
 

 

Hi, I would like to plot multiple curves with arrows pointed at each curve. I don't know how to plot the arrows with values. A similar figure is attached. Thanks for helping . . .

Hello, I want to export several excel files using a loop to

matrixMY: = Matrix (0 .. 5, 0 .. 1);
d: = 0;
with (ExcelTools);
for h from 1 to 10 do:
Export (matrixMY, "d: \ myfiles [h] .xls", "Payroll", "B2");
matrixMY [d, 1]: = h;
end do:


But this does not work well.

Regards.

As the title suggests, that is what one of my current "fool around" projects requires. I have tried to do this using the HTTP package together with the StringTools package, and had mixed results, the main issue being is that in performing the HTTP Get request it  returns an error code unless i constantly import valid "spam" from my clipboard from an external internet brower. 

I will keep working on the way i forsee this being possible, and dont ask why a want to do this from a command line approach rather than just using a search engine, yes i have a good reason for this. If you have done this before, id appreciate the help as it will enable me to improve my life quite a bit.

Ok this is an extract from the help page, i have no idea what this means nor how a procedural function that orders a finite list of objects in a certain way could possibly be described as "non deterministic", so i really really need someone to help me here please, most confusing part is in bold:

sort(L, F)
 

If F is the symbol address, then the elements are sorted by address (a non-deterministic run-time specific property of the underlying data structure)
 

Hello, i need to remove specific elements of a list but cannot do so with the conversion to a set and the use of the difference operation, because there are other repeatitions that are important so i cannot impose the condition of uniqueness in the process of excluding these elements, and want to keep other repeatitions in the original multiset.

I know this must be fairly straight forward because the "Remove Duplication" function retains the order of the original multiset

 

EDIT: i seem to have found a way to it using the "SearchAll" function from the ListTools package, so i can then reconstruct a second list by specifying a set of sequence ranges paritioned accordingly to the indices of the elements of the original i want removed that are obtains using this "SearchAll" function

Hello everyone,

I want to solve the matrix equation UTCU=M, where I know the matrices C and M and I need to find que matrix U.

I already did so many tests but without success.

Could someone help me?

Thanks!

Hello guys,

I need a guide in using maple to perform the integration of this expression or any guide without using Maple.

int((sum(d[i]*ln(x[i]/theta), i = 1 .. n))/(d*(sum(ln(x[i]/theta), i = 1 .. n))^v), theta = 0 .. x)

 

Thanks.

can anyone tell me the difference between subs and eval and  evalf ?

How should I proceed to convert 2ln(3) -3ln(2)  to trigonometric form in Maple?

I am unable to do the following multiplication of two vectors(B and C given below), which is possible in Mathematics but not in Maple(Tried all the possible ways)

 

B := Vector(2, {1 = 2, 2 = 3});
C := Vector(1, {1 = 4});


B . C;
Error, (in LinearAlgebra:-DotProduct) vectors must have the same dimension
B*C;
Error, (in rtable/Product) use *~ for elementwise multiplication of Vectors or Matrices; use . (dot) for Vector/Matrix multiplication
`~`[`*`](B, C);
Error, dimension bounds must be the same for all container objects in an elementwise operation
 

First 859 860 861 862 863 864 865 Last Page 861 of 2427