Я пытаюсь инвертировать реальную матрицу в C ++ LAPACKE. У меня та же функция для сложных матриц, и она работает. Но реальный случай дает неправильный ответ. Вот моя функция:
void inv(std::vector<std::vector<double>> &ans, std::vector<std::vector<double>> MAT){
int N = MAT.size();
int *IPIV = new int[N];
double * arr = new double[N*N];
for (int i = 0; i<N; i++){
for (int j = 0; j<N; j++){
int idx = i*N + j;
arr[idx] = MAT[i][j];
}
}
LAPACKE_dgetrf(LAPACK_ROW_MAJOR, N, N, arr, N, IPIV);
LAPACKE_dgetri(LAPACK_ROW_MAJOR, N, arr, N, IPIV);
for (int i = 0; i<N; i++){
for (int j = 0; j<N; j++){
int idx = i*N + j;
ans[i][j] = arr[idx];
}
}
delete[] IPIV;
delete[] arr;
}
Я пытался инвертировать матрицу двойных чисел 24 на 24. В то время как программа, кажется, почти там, обратное еще не совсем там, и оно сильно отличается от того, что дает python linalg обратный (python прямо здесь, потому что я умножил матрицу на обратное, и результат очень близок к Indentity). В выводе LAPACKE я умножаю матрицу на ее обратную и получаю диагонали, равные 1, но не диагонали go до значений до 0,17, что огромно по сравнению с 0. Есть ли способ заставить программу LAPACKE дать лучший результат? Спасибо!