code for table

> MATRIX([[f(x), diff(f(x),x), f(x), diff(f(x),x)], [x^a, x^a*a/x, a^x, a^x*ln(a)], [ln(x), 1/x, Log[a](x), diff(Log[a](x),x)], [sin(x), cos(x), cos(x), -sin(x)], [tan(x), (sec^2)(x), cot(x), -(csc^2)(x)], [sec(x), sec(x)*tan(x), csc(x), -csc(x)*cot(x)], [arcsin(x), 1/sqrt(1-x^2), arccos(x), -1/sqrt(1-x^2)], [arctan(x), 1/(1+x^2), arccot(x), -1/(1+x^2)], [arcsec(x), 1/(x^2*sqrt(1-1/(x^2))), arccsc(x), -1/(x^2*sqrt(1-1/(x^2)))], [sinh(x), cosh(x), cosh(x), sinh(x)]]);