Функция Inner немного похожа на
Пример 2
Функция Inner немного похожа на скалярное произведение. Собственно говоря, inner[f, список1, список2, g] и есть скалярное произведение, в котором умножение замещается функцией/, а сложение — функцией g.
vl = {a1, a2, a3}; v2 = {b1, b2, b3>; Dot[vl,v2] a1 b1 + 32 b2 + a3 bз Inner[Times,vl,v2,Plus] a1 b1 + 32 b2 + a3 bз
Теперь можем определить основные операции векторного анализа.
Вот определение градиента. gradient[f ,x_List]:=Map[D[f,#]&,x] Вычислим градиент.
gradient[f[x,у, z], {x,y,z}] {f(0,1,0)[x, y, z], f(0,1,0)[x, y, z], f(0,1,0)D[x, y, z]}
Теперь определим гессиан hessian[f_,x_List]:=0uter[D,gradient[f,x],x] и вычислим его:
