Mathematica

[degtyar2000]

В mathematica есть функция FindFit. В документации к этой функции есть такой пример:

data={{1.0,12.},{1.9,10.},{2.6,8.2},{3.4,6.9},{5.0,5.9}};
model=a Exp[-k t];
fit=FindFit[data,model,{a,k},t]
{a->14.3889,k->0.198208}

Вопрос:как получить значения коэффициентов а и k в виде переменных, чтобы их можно было нормально использовать в дальнейших расчетах? Спасибо за ответы!

[caxap]

После этого напишите

{a,k}={a,k} /. %

Но обычно такое присваивание не нужно. Можно использовать саму подстановку на месте:

In[1]:= a+3k^2 /. {a->1,k->2}
Out[2]= 13

In[2]:= Solve[x^2-3x+2==0,x]
Out[2]= {{x -> 1}, {x -> 2}}
In[3]:= x^2+3 /. %
Out[3]= {4, 7}