24小时热门版块排行榜    

查看: 1100  |  回复: 1

queji

铁虫 (正式写手)

[求助] mathematica绘制分段函数,函数图像随着自变量区间间隔变大,逐渐消失。怎么解决呢?

遇到的问题:mathematica绘制分段函数,函数图像随着自变量区间间隔变大,逐渐消失。怎么解决呢?
附件是代码文件,内容如下:
F = (T - 273.15)*1.8 + 32;

"w在(0-0.2)区间的因子";
A1 = -32.252 + 0.99783*F;
B1 = -357.75 - 0.969*F + 0.0013*F*F;
C1 = 0;

"w在(0.2-0.6)区间的因子";
H20 = A1 + 0.2 B1;
H60 = -179.68 + 0.63569*F + 5.8429*0.0001*F*F;
M20 = B1;
C2 = (H20 - H60 + 0.4*M20)/(-0.16);
B2 = M20 - 0.4*C2;
A2 = H20 - 0.2*B2 - 0.04*C2;

"w在(0.6-0.8)区间的因子";
H80 = -159.26 + 0.7985*F;
M60 = B2 + 1.2*C2;
C3 = (H60 - H80 + 0.2*M60)/(-0.04);
B3 = M60 - 1.2*C3;
A3 = H60 - 0.6 B3 - 0.36*C3;

"w在(0.8-0.9)区间的因子";
H90 = -111.54 + 0.67057*F;
M80 = B3 + 1.6*C3;
C4 = (H80 - H90 + 0.1*M80)/(-0.01);
B4 = M80 - 1.6*C4;
A4 = H80 - 0.8*B4 - 0.64*C4;

"w在(0.9-1.0)区间的因子";
H100 = -23.3142 + 0.870283*F;
M90 = B4 + 1.8*C4;
C5 = (H90 - H100 + 0.1*M90)/(-0.01);
B5 = M90 - 1.8*C5;
A5 = H90 - 0.9*B5 - 0.81*C5;


Plot3D[2.326*
  Piecewise[{{A1 + B1*w + C1*w*w, 0 <= w < 0.2}, {A2 + B2*w + C2*w*w,
     0.2 <= w < 0.6}, {A3 + B3*w + C3*w*w,
     0.6 <= w < 0.8}, {A4 + B4*w + C4*w*w,
     0.8 <= w < 0.9}, {A5 + B5*w + C5*w*w, 0.9 <= w <= 1.0}}], {w, 0,
  1}, {T, 0, 350}, AxesLabel -> {w, T}, Mesh -> None,
PlotRange -> Full]
回复此楼

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : 1.nb
  • 2018-05-18 09:41:44, 49.01 K

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

queji

铁虫 (正式写手)

2楼2018-05-21 13:52:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 queji 的主题更新
信息提示
请填处理意见