当我输入函数 ( A1[.2])Exp(t*plus[.2])+(A2[.2])Exp(t*minus[.2])
, where A1[x]
, plus[x]
, A2[x]
, 和minus[x]
是预定义函数时,我得到一个没有函数的绘图输出。
(理想情况下,我可以概括此函数,以便可以将 .2 替换为具有滑块并在图表上实时更新的变量,因此对此的任何帮助也会很棒)
我对 Wolfram 很陌生(今天拿起它),所以我不太确定可能存在哪些语法错误,但我认为这是语法问题,因为这始终是此处类似问题的问题。
在下面的代码中,我确实得到了 、 、 和 的正确答案A1[.2]
,A2[.2]
当plus[.2]
我minus[.2]
实际插入这些数字并将其输入到 Wolfram Alpha 中时,它会得到我正在寻找的确切图表。然而,在这里,没有骰子。
这是我拥有的代码:
{gr,kk,ma,po,ve} = {10,5,1,1,-1}
det[x_] := ((x*gr)^2-(4*kk/ma))^.5
plus[x_] := (-x*gr+det[x])/2
minus[x_] := (-x*gr-det[x])/2
xv = {{po},{ve}}
A1[b_] := Inverse[{{1,1},{plus[b],minus[b]}}][[1]].xv
A2[b_] := Inverse[{{1,1},{plus[b],minus[b]}}][[2]].xv
Plot[(A1[.2])Exp(t*plus[.2])+(A2[.2])Exp(t*minus[.2]),{t,0,5}]
该图应该看起来像一个正弦函数,随着 t 的增加,幅度越来越小,但是图中显示了一个图,而图中没有显示函数。这应该是这样的: