Dear all

I am facing to run the following expression for an arbitrary values of M, k and alpha.

u := simplify(sum(sum(c[p, q]*2^((K-1)*(1/2))*(sum(sum(sum(sum(2^((K-1)*(p-i-j+q-k-l))*GAMMA(p-i-j+1)*x^(p-i-j-alpha)*(1-p)^j*(1-q)^l*g[i]*binomial(p-i, j)*binomial(p, i)*binomial(p-k, l)*binomial(q, k)/GAMMA(p-i-alpha-j+1), l = 0 .. q-k), k = 0 .. q), j = 0 .. p-i-ceil(alpha)), i = ceil(alpha) .. p))/sqrt(2*(-1)^q*factorial(q)^2*g[2*q]/factorial(2*q)), q = 1 .. Delta), p = ceil(alpha) .. Delta));
FD := simplify(convert(%, StandardFunctions)); expand(radnormal(convert(FD, elementary)))

Please correct it and run it for M=10, k=1, alpha=0.5.

Hello,

I have a optimization question in the following picture.

Question: find matrix T(t). 

I writed a maple code. Could you view it ? You think that it is right?

The code file I writed: maple_code_of_theory.mw

 It is really very important for me. Can you help me?

Thank you. 

,Hello everyone 

...I need code for save maple's project like a video

Thankyou

Hi all. I need to solve a large number of PDEs (partial differential equations) symbolically and simultaneously, to find the linearly independant answers for all of them, I use

ans := pdsolve({seq(PDE[i]=0,i=1..d)});

The PDEs are all linear first order and it is very easy to solve them one by one by hand, but in some cases I have 100 PDEs or more, so Maple is either very slow or doesn't work. For d=120, it was evaluating for hours without a result.

For example I have d=120 PDEs, and 200 variables. It works for d=30 of them (takes 13 minutes on my 16GB RAM  windows 7 computer). So if I do this:

ans1 := pdsolve({seq(PDE[i]=0,i=1..30)});

ans2 := pdsolve({seq(PDE[i]=0,i=31..60)});

ans3 := pdsolve({seq(PDE[i]=0,i=61..90)});

ans4 := pdsolve({seq(PDE[i]=0,i=91..120)});

Then how can I have only one vector of the linearly independent answers of all of them?

And in general, is Maple supposed to do this kind of calculations at all?

If yes, do you have any ideas on how to improve this procedure? 

If not, do you know in which software or programming package I can solve a large number of PDEs symbolically?

Your help is much appreciated. 

Hi everyone,

I need to assign the output of the timer block to a variable which is then will be used in a trapeziod signal to add a time offset. Please see the visual below.

Thanks for your time,

Canberk

If you have a list that is too large the list will go off the screen without a way of scrolling.

Is there a way around that?

Here's some test code

with(Maplets):
with(Elements):
maplet := Maplet([["Pick a color:  ", ListBox['LB1'](sort(["blue", "red", "wheat", "yellow", "brown", "gold", "plum", "orange", "pink", "khaki", "magenta", "maroon", "white", "green", "aquamarine", "black", "gray", "navy", "coral", "cyan", "sienna", "tan", "turquoise", "violet", seq(i, i = "a" .. "z")], lexorder))], [Button("OK", Shutdown(['LB1'])), Button("Cancel", Shutdown())]]):
result := Maplets[Display](maplet);

The Maplets, Elements, ListBox (ListBox) example given on the help page doesn't work.  I use the button to transfer the page to a worksheet window but then when I execute them I get an error.  Below is the example given on the help page.  And following that is the errors given after execution.

How do I simulate the follow stochastic differential equations. Thanks very much!

dx=x*(5-2*x-3*y-z)dt+5x*dB1(t);

dy=y*(4-*x-5*y-2z)dt+4y*dB2(t);

dz=z*(2-5*x-7*y-2z)dt+2z*dB3(t);

Just came across actually a couple of applications but seem to be missing the mapleHDLS.src library .  Does anyone have it?

required for these digital electronics applications in Maple8
http://www.maplesoft.com/applications/view.aspx?SID=1419&view=html&L=G

http://www.maplesoft.com/applications/view.aspx?SID=1417&view=html&L=F

I don't know if they were just lost or removed.  Google can't find it, so I think unless someone has a copy of it from way back I might be out of luck. 

Does anyone happen to have it?

I am attempting to minimize an objective function that is related to a p-median problem (facility location). Can somebody please tell me how to impose a constraint that comprises 0 or 1? For instance, I wish to assign the condition, x[i,j] = 0 or 1; in other words, x[i,j] = 1 if the point i is assigned to facilty located at point j; 0 otherwise.

Thanks in advance!

i need to find the graph of exp(v(r)) from 0 to 2e6.

i obtained the graph of v(r) by taking log but how to obtained in exp form

graph_of_exp_form_of_u(r).mw 

Hello,

I would like to know if it is possible to create a dll function from a maple function (a procedure) which would be directly usable in a excel sheet.

In other words, similary to the VBA function that it is possible to build in Excel, i would like to create a dll function that i could use in Excel.

If it is possible, can you help me to use a good process?

Thank you for your help and feedback.

I have four matrix equations

P1, P2, P3 are known 4x4 matrix.

A1 A2 A3 A4 are known 1x4 matrix.

x1 x2 x3 x4 are 1x1 known matrix.

U is 4x4 unknown matrix.

These equations are 

(A1^T*U*P1*A1) +( (P2*A1)^T*U*P1*A1) + ( (P3*A1)^T*U*A1) + ( ( P3*A 2)^T*U*P1*A1) + x1 =0;

(A2^T*U*P1*A2) +( (P2*A2)^T*U*P1*A2) + ( (P3*A2)^T*U*A2) + ( ( P3*A2 )^T*U*P1*A2) + x2 =0;

(A3^T*U*P1*A3) +( (P2*A3)^T*U*P1*A3) + ( (P3*A3)^T*U*A3) + ( ( P3*A3 )^T*U*P1*A3) + x3 =0;

(A4^T*U*P1*A4) +( (P2*A4)^T*U*P1*A4) + ( (P3*A4)^T*U*A4) + ( ( P3*A4 )^T*U*P1*A4) + x4 =0;

How can i find 4x4 matrix U by using these above four equations??

Thank you

First Question: How to define nx1 matrix Y:=(y1,y2,...,yn) ? (n is a Natural number while it is ungiven)

Second Question: How to derivative of matrix Y with respect to nx1 matrix X:=(x1,x2,...,xn) ?

My efforts for the first question:  (I know to define 6x1 matrix etc. , but I dont know to define nx1 matrix

restart: Matrix(1..6,1,symbol=y) 

My efforts for the second question:

restart; with(VectorCalculus);
Matrix([x^2, x*y, x*z]);
Jacobian([x^2, x*y, x*z], [x, y, z]);

Can you help me? 

I can't cut and paste from my maple worksheet (because syntax somehow gets changed in the process), so perhaps the following attempt at carefully worded  prose will do (alternately, please someone tell me how to attach screen shots).  Here goes...

I execute

The optimization succeeds and the assignment takes place.  The result is what I'ld like to cut and paste so youall can see...  it looks as follows. 'r:=' (but no quotes)  followed by open square bracket, then a number, then a comma, then another open square bracket, then a vertically arranged list of stuff, then two close brackets.  I presume the vertically arranged stuff in the innermost matching square brackets somehow represents the point in the search space where the minimum takes place, and the minimum is the number that follows the first square bracket and is before the comma.  My goal is to write to disk the the point in the search space where the minimum takes place (I suppose that vector is in some sense r[2]) .  My attempt to write it to disk is

ExportMatrix("maple.txt", r[2], target = auto)

but maple complains

ExportMatrix("maple.txt", r, target = auto);
Error, invalid input: ExportMatrix expects its 2nd argument, M, to be of type {Matrix, list(Matrix)}, but received [293148935266.099426, Vector(28, {(1) = -233674.34818878854, (2) = 12.62636610207248, (3) = 0.3337043409389546e-2, (4) = 0.13303915611938133e-1, (5) = .0, (6) = .2589485687872699, (7) = 0.9341600279762804e-1, (8) = 0.3293862590239189e-1, (9) = 0.12892649003200331e-1, (10) = 0.606528143324688e-1, (11) = 0.17524827222051658e-1, (12) = -0.16059611469561555e-17, (13) = 0.621465506367271e-1, (14) = .29826235341855, (15) = -0.16288776533795546e-17, (16) = 0.15301368661023716e-1, (17) = 0.1529933711903137e-18, (18) = 0.4375115591744606...

How can I write the result of optimization to disk as a plain ascii text file (tsv format)?

Thanks