数学建模社区-数学中国
标题:
帮我看一下那里有错误好吗 单循环 不运行
[打印本页]
作者:
bbk2720
时间:
2011-12-7 23:05
标题:
帮我看一下那里有错误好吗 单循环 不运行
data = Table[0, {i, 0, qmax, 0.002}, {j, 1, 4}];
{5 Z; {0 D( B& A/ c9 A5 i
length = Dimensions[data][[1]]
( O! L; I1 t- r0 }, }
Do [q1 = Range[0, qmax, 0.002][[i]];
. `, ]; b; z( [- c& H
q = q1 Ew Ipw/R/L^2;
. w( X+ A+ U7 o: y& x/ m7 J
MM = q L^2/8;
; `$ M, R! l" ]; Y2 w# c0 Y
If [ MM <= Mc,
! _+ x- v) }( p' H( l' O4 N+ _
lg = L/2;
; n" ^3 O- Q3 ~9 i d
w = q/lg^3/2/EI (L/3 - lg/4),
4 I/ _' M! p; _0 j
ly = L/2;
( q7 q8 k' U# h4 ?1 z7 r" e6 Z. a( `
lg = L/2 - L/2*Sqrt[1 - 8 Mc/q/L^2];
% K( T% D: Q% k" ^ U% p
weiyi1 = q*lg^3/2/EI (L/3 - lg/4);
' f* H/ Q# l+ f' i" h
w = weiyi1 + (cmax - Cc)/(mmax - Mc) (q*ly^3/2*(L/3 - ly/4) +
) J5 k M0 w! U- E
Mc/2 (lg^2 - ly^2) - q*lg^3/2*(L/3 - lg/4)) +
& B, f1 f# V, S: r2 ~2 r
Cc/2 (ly^2 - lg^2);];
y$ y5 W% M. O8 F
w1 = w/L;
" G9 v; l, x$ [+ D) B) f! g
data[[i]] = {q1, w1, q, w};, {i, 1, length};]
) J" I0 e9 V& t1 j% T8 o
提示以下错误
& q X5 U* d7 B2 E1 X: F1 T
Do::itform: Argument {i,1,length}; at position 2 does not have the correct form for an iterator. >>
3 x) w% x1 {5 }& U1 s. G4 k
0 P) i9 T& j" Y" V6 w* E# o' o
拜托帮我看一下
作者:
hopeoflight
时间:
2011-12-8 14:23
不太懂。。。。
作者:
zj-jscsbao
时间:
2011-12-17 15:05
什么软件？……
欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)
Powered by Discuz! X2.5
