I want to change the size of the heading of a table that includes graphs and am having no luck.
The command I am currently using is
GM = TableForm[GraphM, TableHeadings -> {{"v=1", "v=.5", "v=.25", "v=.125"}, {"k=.4", "k=.2", "k=.1","k=.05"}}, TableAlignments -> Center,] Where GraphM is a grid of plots generated with the command
GraphM = Table[Plot[{((4*k*(1 + a - a*k)*v)/(2 - 3*k*(1 + a - a*k))), (4*k* v/(2 - 3*k))}, {a, 0, 1}, PlotRange -> {0, 2}, AxesOrigin -> {0, 0}, Filling -> {1 -> Top, 2 -> Bottom} , AxesLabel -> {Style[\[Alpha]], Style[\[Beta]^2]}, AxesStyle -> Directive[11], Frame -> True, ImageSize -> 500, BaseStyle -> {FontSize -> 500/25.}], {v, {1, 0.5, .25, .125}}, {k, {.4, .2, .1, .05}}]; the result is the following figure with almost unreadable headings.
I tried a variety of styling commands with no luck. Someone has a suggestion for me on how to make the table headings about the same size of the axes numbers?
