将假设附加到列表时出错--Mathematica

Question

我正在 Mathematica 中编写需要多个假设的代码，但它们有一个很好的模式，所以我想使用 for 循环而不是显式地将它们全部写出来。

assumptions = {};
For[j = 1, j <= 3, j += 1, 
  For[k = 1, k <= 3, k += 1, 
   AppendTo[Element[Subscript[Δ, j, k], Reals], 
    assumptions]; 
   AppendTo[Subscript[Δ, j, k] >= 0, assumptions]]];
...
Assuming[assumptions, ... ]

但是，我似乎无法将这些语句附加到列表中；我收到以下错误：

是不是因为下标才出现这些错误？我可以做些什么来附加这些假设？

编辑：错误根本不是由于下标引起的。为什么它会抛出有关使用 3 个参数调用 Element 的错误？

Answer 1

AppendTo 函数中的参数是倒序的。