数学建模社区-数学中国
标题:
Syntax::sntxi: Incomplete expression; more input is needed .
[打印本页]
作者:
宏心
时间:
2016-8-4 15:25
标题:
Syntax::sntxi: Incomplete expression; more input is needed .
f[x_] := -5/8*(1 - x)^(4/5) + 5/12*(1 - x)^(6/5) + 5/24
% \; K l$ N; N" P. P: H) {
g[x_] := If[x < 1,
4 J* ^; g" H. a" ~) z) r- S
\!\(\*SuperscriptBox[\(f\), \(,\)]\)[x], 0]
! O/ [. P- C6 K1 v4 i7 S: E
Do[t1 = Plot[f[x], {x, 0, 0.04 k}, PlotPoints -> 50,
+ {0 M1 x! q. z
PlotRange -> {{0, 1.1}, {0, 0.22}}, DisplayFunction -> Identity];
l* a) r# C( h, S
y0 = NIntegrate[Sqrt[1 + (g[x])^2], {x, 0, 0.04 k}]/5;
1 U3 e, U1 r; s4 w2 C. d3 F8 l. o
t2 = ParametricPlot[{1, t}, {t, 0, y0}, PlotPoints -> 50,
8 b2 s* x* P. j
DisplayFunction -> Identity];
3 ]0 g8 E3 Y+ O1 c# Y2 M! q! @
Show[t1, t2, DisplayFunction -> $DisplayFunction], {k, 25}]
$ Z, a& G- I5 }" l- ?, R$ ?2 D
欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)
Powered by Discuz! X2.5