こんにちは、線形連立方程式を mathematica で解こうとしています。18 個の方程式と 18 個の未知数があり、係数行列はフル ランクです。問題を分析的に解決しようとしているので、すべてのエントリは象徴的です。残念ながら Mathematica が評価を止めることはありません．最小限の実例を用意しました:
n = 18
A = Table[AA[i, j], {i, 1, n}, {j, 1, n}];
A // MatrixForm
x = Table[xx[i], {i, 1, n}]
b = Table[bb[i], {i, 1, n}]
MatrixRank[A]
sol = Timing[Solve[{A.x == b}, x, Reals]]
A.x == b //. sol[[2]][[1]] // Simplify
n=2,3,4,.. の場合、すべてが完全にうまく機能します。しかし、n=10 では... もう何も機能しません。Mathematica はなぜこのような問題を解決したのでしょうか? この問題を解決する方法はありますか?
手伝ってくれてありがとう、
アンドレアス