数学建模社区-数学中国
标题:
帮我看一下那里有错误好吗 单循环 不运行
[打印本页]
作者:
bbk2720
时间:
2011-12-7 23:05
标题:
帮我看一下那里有错误好吗 单循环 不运行
data = Table[0, {i, 0, qmax, 0.002}, {j, 1, 4}];
+ D0 \5 o1 s9 P
length = Dimensions[data][[1]]
0 M7 }$ d) J" t3 `- u- ]6 {4 e
Do [q1 = Range[0, qmax, 0.002][[i]];
6 ^0 ~" ~; K2 e4 W6 D
q = q1 Ew Ipw/R/L^2;
" Q' r# A0 A7 e5 R* ~
MM = q L^2/8;
% S& V( o: |2 k2 t6 h5 H! _5 @
If [ MM <= Mc,
( l8 `+ a8 ~- Y3 v& `
lg = L/2;
1 [ u) r" L4 J( S( N: l2 d
w = q/lg^3/2/EI (L/3 - lg/4),
4 @& ^0 L9 s! x- A# J, f9 j4 [
ly = L/2;
. V, v) }" c; E6 \8 e
lg = L/2 - L/2*Sqrt[1 - 8 Mc/q/L^2];
8 Z* o# x& O/ |
weiyi1 = q*lg^3/2/EI (L/3 - lg/4);
2 p* U) c" c: {! a
w = weiyi1 + (cmax - Cc)/(mmax - Mc) (q*ly^3/2*(L/3 - ly/4) +
' d5 {9 e% \6 T8 J# g* ?* y
Mc/2 (lg^2 - ly^2) - q*lg^3/2*(L/3 - lg/4)) +
% p. m6 {+ E1 X
Cc/2 (ly^2 - lg^2);];
5 I% w1 `1 n: j. L4 F$ o
w1 = w/L;
4 V& K/ ]0 @& E# F' h7 s
data[[i]] = {q1, w1, q, w};, {i, 1, length};]
" J) _- C) r. L% Z* x
提示以下错误
9 c/ C: T. p( r0 _7 J+ ]/ }# F$ ~
Do::itform: Argument {i,1,length}; at position 2 does not have the correct form for an iterator. >>
+ w6 z" T* S/ E8 y) x
1 D; e3 O6 @% y$ a4 h4 z
拜托帮我看一下
作者:
hopeoflight
时间:
2011-12-8 14:23
不太懂。。。。
作者:
zj-jscsbao
时间:
2011-12-17 15:05
什么软件？……
欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)
Powered by Discuz! X2.5
