ntostr:=proc(n) begin return(strprint(Unquoted,NoNL,n)); end_proc; matrix(3,3 , (i,j) -> text2expr("x".ntostr(i)."_".ntostr(j))); +- -+ | x1_1, x1_2, x1_3 | | | | x2_1, x2_2, x2_3 | | | | x3_1, x3_2, x3_3 | +- -+
3x3 行列ぐらいなら、手で打っても同じですが、 行列のサイズが大きいときには重宝するかも知れません。