san

15 Reputation

3 Badges

6 years, 223 days

MaplePrimes Activity


These are replies submitted by san

@tomleslie 

Thank very much you for answer.

I think the code will help me. Do you Know how can put all in one matrix?

i.e [M1,M2,....]

@John Fredsted 

Thank very much you for answer.

I think the code will help me. But when I tried to find f(4,4) or f(8,8) I didn't get a matrix like f(2,2). Do Know what the problem?.

 

 

 

@Kitonum 

Thank you for your answer.

This code can't help me because I am not looking for summing. I want expand the perivious  formula as I did for one dimension.
 

restart:

Digits := 20;

20

(1)

k:=14;

14

(2)

for v from 0 to k do

p[v,k]:=expand(binomial(k,v)*t^v*(1-t)^(k-v))

end do:

``

      ``  ``P[T]:=matrix(15,1,[p[0,14],p[1,14],p[2,14],p[3,14],p[4,14],p[5,14],p[6,14],p[7,14],p[8,14],p[9,14],p[10,14],p[11,14],p[12,14],p[13,14],p[14,14]]);

``


 

Download loop_of_one_variable.mw

@nm 

I want expand the formula for i& j, i.e. i=j:=1 to 10, where m, n are fixed number (say m=n=10)

@Carl Love 

Thanks a lot for your reply and explain, I add the command it is run but the results, not in stander matrix form.

Also, the product ( last step) don't give an answer. I do another programme but in small size , it is doing well.

Thank  you again 

 

 

 

 

 

 d1for_n=20.mw

doing_well.mw

@PascalQM 

Thanks a lot for your reply, I remove the space but I have the same problem.

with(LinearAlgebra[Generic]):

Q[`0`], Q[`1`], Q[`+`], Q[`-`], Q[`*`], Q[`/`], Q[`=`] := 0, 1, `+`, `-`, `*`, `/`, `=`

0, 1, `+`, `-`, `*`, `/`, `=`

(1)

v1 := Matrix(21, 21, [1, -20, 190, -1140, 4845, -15504, 38760, -77520, 125970, -167960, 184756, -167960, 125970, -77520, 38760, -15504, 4845, -1140, 190, -20, 1, 0, 20, -380, 3420, -19380, 77520, -232560, 542640, -1007760, 1511640, -1847560, 1847560, -1511640, 1007760, -542640, 233560, -77520, 19380, -3420, 380, -20, 0, 0, 190, -3420, 29070, -155040, 581400, -1627920, 3527160, -6046560, 8314020, -9237800, 8314020, -6046560, 3527160, -1627920, 581400, -155040, 29070, -3420, 190, 0, 0, 0, 1140, -1930, 155040, -775200, 2713200, -7054320, 14108640, -22170720, 27713400, -27713400, 22170720, -14108640, 7054320, -2713200, 775200, -155040, 19380, -1140, 0, 0, 0, 0, 4845, -77520, 581400, -2713200, 8817900, -21162960, 38798760, -55426800, 62355150, -55426800, 38798760, -21162960, 8817900, -2713200, 581400, -77520, 4845, 0, 0, 0, 0, 0, 15504, -232560, 1627920, -7054320, 21162960, -46558512, 77597520, -99768240, 99768240, -77597520, 46558512, -21162960, 7054320, -1627920, 232560, -15504, 0, 0, 0, 0, 0, 0, 38760, -542640, 3527160, -14108640, 38798760, -77597520, 116396280, -133024320, 116396280, -77597520, 38798760, -14108640, 3527160, -542640, 38760, 0, 0, 0, 0, 0, 0, 0, 77520, -1007760, 6046560, -22170720, 55426800, -99768240, 133024320, -133024320, 99768240, -55426800, 22170720, -6046560, 1007760, -77520, 0, 0, 0, 0, 0, 0, 0, 0, 125960, -1511640, 8314020, -27713400, 62355150, -99768240, 116396280, -99768240, 62355150, -27713400, 8314020, -1511640, 125970, 0, 0, 0, 0, 0, 0, 0, 0, 0, 167970, -1847560, 9237800, -27713400, 55426800, -77597520, 77597520, -5542600, 27713400, -9237800, 184560, -167960, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 184756, -1847560, 8314020, -22170720, 38798760, -46558512, 38798760, -22170720, 8314020, -1847560, 184756, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 167960, -1511640, 6046560, -14108640, 21162960, -21162960, 14108640, -6046560, 1511640, -167960, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 125970, -1007760, 3527160, -7054320, 8817900, -7054320, 3527160, -1007760, 125970, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 77520, -542640, 1627920, -2713200, 2713200, -1627920, 542640, -77520, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 38760, -232560, 581400, -775200, 581400, -232560, 38760, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 15504, -77520, 155040, -155040, 77520, -15504, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4845, -19380, 29070, -19380, 4845, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1140, -3420, 3420, -1140, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 190, -380, 190, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -20, 20, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1])

RTABLE(18446744074182213630, anything, Matrix, rectangular, Fortran_order, [], 2, 1 .. 21, 1 .. 21)

(2)

d1 := MatrixInverse[Q](v1)

RTABLE(18446744074182213782, anything, Matrix, rectangular, Fortran_order, [], 2, 1 .. 21, 1 .. 21)

(3)

NULL


Download d1for_n=20.mw

@Axel Vogt 

Thank you very much for your answer, I checked the system I have 30 equation with 30 variable.

I don't intend Eq[1,1]=0.  

My problem I solved this system twice, just I change a number in Eq2. One of them gave   a solution but the other didn't give .

 

L.S_n=10_R=28_(1).mw   

 

@Carl Love 

Thank you very much for your reply , when I add the option complex I get a complex solution and I looking for a real solution . 

Thank you very much 

San. 

@Mac Dude 

Thank you for your reply,I don't Kown the exact solution for this system, just numerical solution. 

Acutely I solved this system twice , one of them I get a solution. I attached it here. 

So I don't What this mean ?!. Is this mean the system can't solve by own method ?.

L.S_n=10_R=28_(1).mw  

Thank you very much 

San.

 

@Kitonum

Thanks a lot for your help. 

I do the same process for another example, all steps run without use this command (interface...). But in this example,  the matrix inverse doesn't run. I don't Know why I use maple 18.

Here I attached the other  example. 

 

 another_example.mw

@acer 

Thanks a lot for your help 

@Kitonum 

I attached the file, please see it.

Thanks a lot

@Christopher2222 

I attached the file, please see it.

Thanks alot

Page 1 of 1