matrix.m 330 B

12345678910111213141516
  1. file = fopen('lab_3.txt', 'w')
  2. for x = 0 : 1 : 8
  3. A = rand(10)
  4. cond(A)
  5. [u d v] = svd(A)
  6. d = eye(10)
  7. d(1,1) = 10.^x
  8. M1 = u*d*v'
  9. cond(M1)
  10. if issymmetric(M1) ~= 0
  11. prinf("error")
  12. end
  13. formatSpec='%.4f %.4f %.4f %.4f %.4f %.4f %.4f %.4f %.4f %.4f\n'
  14. fprintf(file, formatSpec, M1)
  15. end
  16. fclose(file)