Мультимедиа: геометрия, графика, кино, звук


Пример 2



Пример 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] и вычислим его:








Начало  Назад  Вперед