> round(mat1[, 2:5] - mat1[, 1], digits = 6)
            Vm        Vs      Vmd        Va 
[1,] -0.000078 -0.000086 0.000055 -0.000058
[2,] -0.001721 -0.002082 0.000728 -0.001451
[3,]  0.000012 -0.000001 0.000028  0.000012
[4,] -0.003175 -0.000288 0.000194 -0.000073
[5,] -0.033286 -0.078311 0.047089  0.008884
[6,] -0.034571 -0.053089 0.017319  0.031220
[7,] -0.000321 -0.000766 0.000545 -0.000113
[8,]  0.007765 -0.001352 0.026324  0.038138
[9,] -0.000916 -0.001657 0.001519  0.002031
> mat1.approx <- round(mat1, digits = 5)
> latex.tab(mat1.approx)
       X1 X2     X21 X3    X211 X32   X2111 X322  X21111 X3222 
1 0.00051  & 0.00043  & 0.00042   & 0.00056    & 0.00045    \\
2 0.01410  & 0.01237  & 0.01201   & 0.01482    & 0.01264    \\
3 0.00023  & 0.00024  & 0.00023   & 0.00025    & 0.00024    \\
4 0.00405  & 0.00087  & 0.00376   & 0.00424    & 0.00398    \\
5 0.47065  & 0.43737  & 0.39234   & 0.51774    & 0.47954    \\
6 0.40968  & 0.37511  & 0.35659   & 0.42700    & 0.44090    \\
7 0.00466  & 0.00434  & 0.00390   & 0.00521    & 0.00455    \\
8 0.12409  & 0.13186  & 0.12274   & 0.15042    & 0.16223    \\
9 0.00898  & 0.00806  & 0.00732   & 0.01050    & 0.01101    \\