Advertisement
antarych

Untitled

Oct 19th, 2017
79
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.03 KB | None | 0 0
  1. private void GetQR(double[,] matrixB, double[,] Q, double [,] R)
  2. {
  3. for (int i = 0; i < N; i++)
  4. Q[i, 0] = matrixB[i, 0];
  5.  
  6. R[0, 0] = 1;
  7. var sum = 0.0;
  8. for (int k = 0; k < N; k++)
  9. {
  10. for (int i = 0; i < N; i++)
  11. {
  12. sum += matrixB[i, k] * matrixB[i, k];
  13. }
  14. R[k, k] = Math.Sqrt(sum);
  15. sum = 0;
  16. for (int i = 0; i < N; i++)
  17. Q[i, k] = matrixB[i, k] / R[k, k];
  18.  
  19. for (int j = k; j < N; j++)
  20. {
  21. for (int i = 0; i < N; i++)
  22. {
  23. sum += Q[i, k] * matrixB[i, j];
  24. }
  25. R[k, j] = sum;
  26. sum = 0;
  27. for (int i = 0; i < N; i++)
  28. matrixB[i, j] = matrixB[i, j] - Q[i, k] * R[k, j];
  29. }
  30. }
  31. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement