0

当我输入函数 ( 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 的增加,幅度越来越小,但是图中显示了一个图,而图中没有显示函数。这应该是这样的: 在此处输入图像描述

4

0 回答 0