之前吸取了各位吧友的意见,现在到这一步了。绘制插值函数图像,如何正确出图呢
x=3434
β=0.0001
∅=(0.1193t-10.685)/100
S=-0.4064t+159.6
h=-15.95t+6263.8
T=-0.6938t+273.77
q=0.091577179
NDSolve[{(∅/(P[t])-β+∅×β)P'[t]==((x/(P[t])-(P[t]-0.01(h-300))/300))⁄300+(1-∅)β×-0.4064+∅/T×-0.6938+q,P[244]==24},P,{t,172,244}]
