情节显示了类似论点的不同答案

Question

我刚刚开始学习数学，如果这是一个简单的问题，请原谅我。我试图找出为什么包含 ReplaceAll 表达式的 Plot 与 Plot 和 Set 的工作方式不同。我有：

Clear["Global`*"]
I0[t_] = HeavisidePi[(t - 1/2 10^-9)/10^-9];
sol = DSolve[{D[I2[t], t]*R == I1[t]/C0, I0[t] == I1[t] + I2[t], 
    I2[0] == 0}, {I1[t], I2[t]}, t];
I2 = I2[t] /. sol[[1]];
Plot[I2 /. {C0 -> 5*10^-12, R -> 500}, {t, -2 10^-9, 10^-8}]
C0 = 5*10^-12;
R = 500;
Plot[I2, {t, -2 10^-9, 10^-8}]

由于某种原因，第一个 Plot 给出了正确的答案，第二个给出了错误的答案。我期待同样的答案。造成差异的原因是什么？

Answer 1

是的，这很有趣。如果首先设置t，则t = 0.5* 10^-9 的值是0.181269，但如果它一直是符号，则结果是0.402672

a = Plot[
   I2 /. {C0 -> 5*10^-12, R -> 500}, {t, -2 10^-9, 10^-8}];

b = Plot[Evaluate[
    I2 /. {C0 -> 5*10^-12, R -> 500}], {t, -2 10^-9, 10^-8}];

x = 0.5* 10^-9;

c = I2 /. t -> x /. {C0 -> 5*10^-12, R -> 500}

0.181269

d = I2 /. {t -> x, C0 -> 5*10^-12, R -> 500}

0.402672

Show[{a, b, ListPlot[{{x, c}, {x, d}}]}, PlotRange -> All]