Цитата TaDa:
|
Существует ли способ задать в сумме Sum[] или произведении Product[] дополнительное условие на индексы? И в чем состоит этот способ? »
|
Если честно, никогда не сталкивался с подобной задачей, но, возможно, Вашу задачу решил бы самый простой подход - определить весовую функцию от индексов.
Допустим, Вы хотите вычислить след матрицы. Сделаем это, определив зависимости между индексами так, чтобы учитывались только элементы на диагонали матрицы (естественно, просто для примера - в реальной жизни любого человека, который считает след в Mathematica подобным образом надо срочно госпитализировать в Кащенко как идиота):
Aij = Table[A[i, j], {i, 10}, {j, 10}]
z[i_,j_] := If [ i==j, 1, 0 ]
Sum[Sum[z[i, j]Aij[[i, j]], {j, 10}], {i, 10}]
P.S. Простите, я понимаю, что подход очевидный и примитивный, но может быть найдете способ как-нибудь от него оттолкнуться?