Tag Info

New answers tagged

1

a machine precision symmetric matrix: n = 5; m = Nest[ Join[#, {Table[#[[i, (Length[#] + 1)]], {i, Length[#]}]~Join~ RandomReal[{-10, 10}, {n - Length[#]}]}] & , {} , n]; convert the matrix to an exact rational form, do the eignevector extraction and convert back to high precision floats: ev = N[Normalize /@ ...



Top 50 recent answers are included