# Align table entries on decimal point and fix number of digits after decimal point

I have:

f[t_] := 4 t^3 - 3; g[t_] := -t^3 + 2;
TableForm[
Table[{t, f[t], g[t]}, {t, 0, 2, .5}],
TableHeadings -> {{}, {t, x, y}},
TableAlignments -> Center]


Which gives the following output:

Is it possible to align each column on its decimal point? Further, is it possible to add zeros so that each number in the first column has one digit to the right of the decimal point, each number in the second column has one digit to the right of the decimal point and each number in the third column has three digits to the right of the decimal point?

• – Alexey Popkov Dec 19 '14 at 23:03

TableForm[