Когда я ввожу функцию (A1[.2])Exp(t*plus[.2])+(A2[.2])Exp(t*minus[.2]), где A1[x], plus[x], A2[x] и minus[x] - предопределенные функции, я получаю вывод графика без функции.
(В идеале, я бы смог обобщить эту функцию, чтобы .2 можно было заменить на переменную с ползунком, которая бы обновлялась в реальном времени на графике, так что любая помощь с этим была бы также полезна)
Я довольно новичок в Вольфраме (поднял его сегодня), поэтому я не слишком уверен, какие могут быть синтаксические ошибки, но я предполагаю, что это проблема с синтаксисом, так как это всегда проблема в подобных проблемах здесь.
В приведенном ниже коде я получаю правильные ответы для 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}]
График должен выглядеть следующим образомсинусоидальная функция, которая становится все меньше и меньше по мере увеличения т, но тздесь показан график, а на графике нет функций.Вот как это должно выглядеть: 