matrix with loop...

How we can get matrix M with the help of loop?

Whole of answers not just zero...

Hello

Im solving a problem. When i use solve command maple dont give me whole of amswers it just give solve the obvious problem that is zero. what i should do to it give all of the answers not just zero?

Matrix from -x to x as opposed to 1-x???...

Hi guys,

I'm very new to Maple and I'm trying to get  a 'diagonalisable' matrix set up.

It will help for me to attach what I currntly have for this to make sense:

What I currently have is a way of setting up a 5x5 matrix where it inserts a value at every instance where i=j, i=j+3 and i=j+6.

Currently I can only make this work for value from 1 to x and, for this to work, I basically need to make up a matrix that goes from -x to x

i.e currently I have x = 1 though 5 (5x5) and I need to set it up for x= -5 through 5 (11x11)

Every time I try and get the negative elements and 0 in there it tells me that I can't do it.

Is there any way to do this is Maple and am I going the wrong way about it?

Thanks very much for your time!

How to save a Maple file on a text mode only serve...

I'm using Maple on a compute server (via Putty from my computer which has windows system). It is an only-text mode server so it is a black screen and text and no menu bar to choose file and then save by clicking etc. You only can write commands and press Enter.

The IT section suggested to use writeto("filename.txt"), but I can't see any file on my drive, I used writeto("\drvename\filename.txt"), but still nothing.

Thanks to @acer@Joe Riel and the IT section. The problem now is solved. It was about the way that I was writing the directory path. I had to add something before the "drivename" in my case. Plus that it is a Unix path, so I should use / not \.

program Loop Problem?...

Please check the value of T[1] ?

Maple 2018 won't open...

Hello, i am experiencing some problems when trying to open the maple 2018 software*
I have tried to search for sollution but there is very ittle intel
When i open Maple 2018 it just lingeres on the start up (pic below) and just disappears after 10 seconds

how to generate matrix ...

how we can get matrix of p[2],p[0] and p[1] when p[2]=1,p[0]=1 and  p[1]=-x and x[0]=-1,x[1]=-2/3 ,x[3]=0 when the general matrices of p are given below.....and answer should be p[2]=p[0]= identity matrix and p[1]= only diagonal values are 1,2/3,1/3,0..

How can i solve second order fractional order part...

Diff.(u(x,t), t\$alpha) = 1/2. x^2. Diff(u(x,t),x\$2), 0 <x <1, t >0, alpha =1.5  or  1.75

Bcs: u(0,t) = 0, u(1,t) = 1 + sinh t,

Ics: u(x,0) = x, ut(x,0) = x^2

how to use For loop inside Procedure. i'm trying t...

restart;
F0:=proc(sigma__xx,N)
local  x,y,Fx,Fy,:
assume (w,real,w>0):assume (h,real,h>0):

for n from 0 by 2 to N do Fx:=integrate(sigma__xx*cos(w*Zeta*h),Zeta=0..infinity):
end do;
for n from 1 by 2 to N do Fx:=integrate(sigma__xx*sin(w*Zeta*h),Zeta=0..infinity):
end do;
return [Fx]:
end proc;

sigma__xx := -(sqrt(Zeta^2*h^2+h^2)^(-n+2)*cos(n*arctan(h, Zeta*h))*n^2+sqrt(Zeta^2*h^2+h^2)^(-n+2)*cos(n*arctan(h, Zeta*h))*n-2*sqrt(Zeta^2*h^2+h^2)^(-n+2)*cos(n*arctan(h, Zeta*h)))*Zeta^2*h^2/(Zeta^2*h^2+h^2)^2+(sqrt(Zeta^2*h^2+h^2)^(-n+2)*cos(n*arctan(h, Zeta*h))*n^2-3*sqrt(Zeta^2*h^2+h^2)^(-n+2)*cos(n*arctan(h, Zeta*h))*n;

F0(sigma__xx,N);

assignment of a multi varibled variable...

In Maple we can assign single named variables to values.  I was just wondering if it would be worthwhile if Maple could be set up to work with a multivariable assignment.  Not sure if my wording is understandable but hopefully someone can understand my point, or deter me from even thinking that way.

Would it ever help in calculations in Maple if we were to make an assignment something like this :

v2:= a2 + b2

or

a * b := 3*x + 5*y2

Haven't looked into it too hard, I'd like to know if there might be a situation where this type of assignment would be helpful.  I mean, does it make sense to do this kind of thing.  I wonder if there is a situation where this type of thing is useful, or maybe it's just impossible to work right anyway.  Maybe it's already been tried?  Thoughts?

dll.mw

Hi

Analysis of Error of a Numerical Methods....

Hi,

I have a numeric method for solving differential equations. You can find the Maple code.

Question: In the method, we have 10^(-6) decimal error. How to quickly find the which decimal error by Maple? What are your suggestions?

How to set up the the output format of graphs?...

Hi:
I use the following codes:
with(GraphTheory):
Graphs_data3:=[NonIsomorphicGraphs(6,restrictto =[connected], output
= graphs, outputform =graph)]:
Diameter2_select:=select[flatten](t->Diameter(t)=2,Graphs_data3):
map(DrawGraph,Diameter2_select);
nops(Diameter2_select);

Since  59 graphs are not many, so,I want to display  it. But the list show that
[Length of output exceeds limit of 1000000]`
How do I do?

If I use DrawGraph(Diameter2_select), the output is to large, and it is  not convenient to print it out .

maple dosent solve my problem?...

i have a assignment problem to optimize with 1200 variables and almost 1000 constraints. but maple couldnt solve it. anyone who can help me is welcome

or may i try another app?

thanks

this is the my model
tam2.mw

 > restart;
 >
 >
 > we:=[1,2,8,9,15,16,22,23,29,30];
 (1)
 > wd:=[3,4,5,6,7,10,11,12,13,14,17,18,19,20,21,24,25,26,27,28];
 (2)
 > #printlevel :=3;
 > for j from 1 to 30 do #her gündüz vardiyasında en az 4 hemşire bulunsun a[j]:=sum(x[i][j][1], i=1..20)>=4: end do;
 (3)
 > A := [seq(a[j],j=1..30)];
 (4)
 > #her gece vardiyasında en az 4 hemşire bulunsun for j from 1 to 30 do b[j]:=sum(x[i][j][2], i=1..20)>=4: end do;
 (5)
 >
 > B := [seq(b[j],j=1..30)];
 (6)
 > #her hemşire ayda en az 4 hafta içi gündüz vardiyasında çalışsın for i from 1 to 20 do c[i]:=sum(x[i][wd[k]][1], k=1..20)>=4: end do;
 (7)
 > C := [seq(c[i],i=1..20)];
 (8)
 > #her hemşire ayda en az 4 hafta içi gece vardiyasında çalışsın for i from 1 to 20 do d[i]:=sum(x[i][wd[k]][2], k=1..20)>=4: end do;
 (9)
 > dd:= [seq(d[i],i=1..20)];
 (10)
 > #her hemşire ayda en az 2 hafta sonu gündüz vardiyasında çalışsın for i from 1 to 20 do e[i]:=sum(x[i][we[k]][1], k=1..10)>=2; end do;
 (11)
 > E:= [seq(e[i],i=1..20)];
 (12)
 > #her hemşire ayda en az 2 hafta sonu gece vardiyasında çalışsın for i from 1 to 20 do f[i]:=sum(x[i][we[k]][2], k=1..10)>=2; end do;
 (13)
 > F:= [seq(f[i],i=1..20)];
 (14)
 > #gece vardiyasında çalışan hemşire ertesi gündüz ve gece vardiyalarında izinlidir for i from 1 to 20 do for j from 1 to 29 do g[i][j]:=2*x[i][j][2]+x[i][j+1][1]+x[i][j+1][2]<=2 end do; end do;
 > for i from 1 to 20 do g[i] := seq(g[i][j],j=1..29) end do;
 > g:= [seq(g[i],i=1..20)];
 > with(Optimization);
 > Minimize( sum(t[m], m=1..20),{A[],B[],C[],dd[],E[],F[],g[]}, assume = binary );