Advanced Search

Question: how to get the solutions?

Question:how to get the solutions?

005001008 16 Maple
solve import
September 15 2007
0
first read 80 numbers(x[i]) from the file"d:\data.txt",and then solve the equations contain the x[i] and a b c (unknown)．Ｉcan not get solution but the Error: Error, (in tools/add) invalid terms in sum help me,Thank you! ＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊ > fd_0=FileTools[Text][Open]("D:\\data.txt", create= false, overwrite= false); > n:=FileTools[Text][CountFloats]( "D:\\data.txt" ); fd_0 = 0 n := 80 > x:=array(1..n); x := array(1 .. 80, []) > for i from 1 to n do; > x[i]:=readline("D:\\data.txt"); > end do; x[1] := "0.3" x[2] := "0.3" x[3] := "0.3" x[4] := "0.4" x[5] := "0.4" x[6] := "0.4" x[7] := "0.5" x[8] := "0.5" x[9] := "0.5" x[10] := "0.6" x[11] := "0.6" x[12] := "0.6" x[13] := "0.6" x[14] := "0.7" x[15] := "0.7" x[16] := "0.7" x[17] := "0.7" x[18] := "0.7" x[19] := "0.8" x[20] := "0.8" x[21] := "0.8" x[22] := "0.8" x[23] := "0.8" x[24] := "0.9" x[25] := "0.9" x[26] := "0.9" x[27] := "0.9" x[28] := "0.9" x[29] := "1" x[30] := "1" x[31] := "1" x[32] := "1.1" x[33] := "1.1" x[34] := "1.1" x[35] := "1.2" x[36] := "1.2" x[37] := "1.2" x[38] := "1.2" x[39] := "1.2" x[40] := "1.3" x[41] := "1.3" x[42] := "1.3" x[43] := "1.3" x[44] := "1.3" x[45] := "1.3" x[46] := "1.4" x[47] := "1.4" x[48] := "1.4" x[49] := "1.4" x[50] := "1.5" x[51] := "1.5" x[52] := "1.5" x[53] := "1.5" x[54] := "1.5" x[55] := "1.6" x[56] := "1.6" x[57] := "1.6" x[58] := "1.6" x[59] := "1.6" x[60] := "1.7" x[61] := "1.7" x[62] := "1.7" x[63] := "1.7" x[64] := "1.8" x[65] := "1.8" x[66] := "1.8" x[67] := "1.8" x[68] := "1.8" x[69] := "1.9" x[70] := "1.9" x[71] := "1.9" x[72] := "2" x[73] := "2" x[74] := "2.1" x[75] := "2.1" x[76] := "2.1" x[77] := "2.2" x[78] := "2.2" x[79] := "2.3" x[80] := "2.4" > m1:=(1.0-c)*sum(((x[i_1]-a)**(-1.0)),i_1=1..n)+(c/b)*sum((((x[i_2]-a)/b)**(c-1.)),i_2=1..n)=0.0; > > m2:=(c/b)*(sum((((x[i_3]-a)/b)**c),i_3=1..n)-n)=0.0; > m3:=(n/c)+sum(ln((x[i_4]-a)/b),i_4=1..n)-sum(((((x[i_5]-a)/b)**c)*ln((x[i_5]-a)/b)),i_5=1..n)=0.0; Error, (in tools/add) invalid terms in sum Error, (in tools/add) invalid terms in sum Error, (in tools/add) invalid terms in sum > sol:=fsolve({m1,m2,m3},{a,b,c}); Error, (in tools/add) invalid terms in sum > close(fd_0); > close(fd_1); ＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊８
Please Wait...