如何用Mathematica软件完成如下数学题目?(肿瘤生长模型) 肿瘤大小V的生长速度与V的a次方成正比,其中a为形状参数,0

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/15 15:04:21
如何用Mathematica软件完成如下数学题目?(肿瘤生长模型) 肿瘤大小V的生长速度与V的a次方成正比,其中a为形状参数,0
x){ީϧM,HM,LN|w۞y1$ O.{hxѴ%ϧ9u ~S"tÞjȿltײ';@B,|6m'gk?[?Ei';&>ٱEϻ=oZc`TOB;A9Ee: : % @: HX9@Kp~NYjtuztIB6*q@0Q]pE@BhZjm DG6VA! '$ڵ,14$5dj,D\VVƧkv-xi~qAb(e4

如何用Mathematica软件完成如下数学题目?(肿瘤生长模型) 肿瘤大小V的生长速度与V的a次方成正比,其中a为形状参数,0
如何用Mathematica软件完成如下数学题目?
(肿瘤生长模型) 肿瘤大小V的生长速度与V的a次方成正比,其中a为形状参数,0

如何用Mathematica软件完成如下数学题目?(肿瘤生长模型) 肿瘤大小V的生长速度与V的a次方成正比,其中a为形状参数,0
Clear[v, k, t]; a = 1; b = 0.1; sol = NDSolve[{v'[t] == k[t]*v[t]^a, k'[t] == -k[t]*b, v[0] == k[0] == 1}, {v, k}, {t, 200}] Plot[Evaluate[v[t] /. %], {t, 0, 200}] Clear[v, k, t]; a = 2/3; b = 0.1; sol = NDSolve[{v'[t] == k[t]*v[t]^a, k'[t] == -k[t]*b, v[0] == k[0] == 1}, {v, k}, {t, 200}] Plot[Evaluate[v[t] /. %], {t, 0, 200}] 老公加油!