您好,并提前致谢,
我遇到了一个试图在Mathematica中绘制分段函数的问题。当直接输入Plot函数时,分段没有绘制。但是,当我将分段定义为变量时,它确实是绘图。为什么会出现这个问题,我还可以加入我的情节吗? (我想通过设置排除项来加入它)
以下是我的代码:(我定义了Maxwell应变函数,并尝试在多个应力循环中模拟聚合物的塑性变形)
z = 2*10^10;
h = 10^12;
MaxwellStrain[s_, t_] := s/z + (s*t)/h;
stress = {0, 10^7, -10^7, 5*10^6, 10^7, -5*10^6};
time = {0, 100, 200, 300, 400, 500};
strainList = Join[{0}, Table[MaxwellStrain[stress[[i + 1]], t - time[[i]]], {i, 1, 5}]];
Plot[
Piecewise[
Table[{
Total[strainList[[1 ;; i + 1]]], time[[i]] < t < time[[i + 1]]},
{i, 1, 5}
],
Exclusions -> none]
,
{t, 0, 500}
]
x = Piecewise[
Table[{
Total[strainList[[1 ;; i + 1]]], time[[i]] < t < time[[i + 1]]},
{i, 1, 5}
],
Exclusions -> none]
Plot[x, {t, 0, 500}]
以下是我的输出:(第一个情节不显示,第二个显示)
谢谢你的帮助, SV