# How to shorten the space between the two rows of graphics in GraphicsGrid?

Posted 10 years ago
5658 Views
|
2 Replies
|
0 Total Likes
|
 Hi, everyone,Would you please tell me how to shorten the space between the two rows of graphics? Clear["`*"];  f[\[Alpha]_, \[Lambda]r_, \[Lambda]s_,      k_] = (-1 + (-1 + \[Alpha]) \[Lambda]s)^2/((1 + \[Alpha] \  (\[Lambda]r - \[Lambda]s) + \[Lambda]s) (2 +         k - (1 + k) (-1 + \[Alpha]) \[Lambda]s)^2) - (1/(     1 + k (1 + \[Lambda]s - \[Alpha] \[Lambda]s)))^(    1 + 1/k) (1 + \[Lambda]s - \[Alpha] \[Lambda]s + ((2 +          k - (1 + k) (-1 + \[Alpha]) \[Lambda]s) ((         k (1 + k) (-1 + (-1 + \[Alpha]) \[Lambda]s))/(         1 + k (1 + \[Lambda]s - \[Alpha] \[Lambda]s)) -          Log[1/(1 + k (1 + \[Lambda]s - \[Alpha] \[Lambda]s))]))/k^2);h1 = Labeled[   Plot[{f[0.3, 20, 1, k], f[0.3, 1, 20, k], f[0.3, 20, 20, k]}, {k,      0, 10}, PlotStyle -> {Blue, Red, Green},     AxesLabel -> {"k value", Increasing Speed      }, PlotLegends ->      Placed[{"\[Lambda]r>\[Lambda]s", "\[Lambda]r<\[Lambda]s",        "\[Lambda]r=\[Lambda]s"}, Above]], "\[Alpha]=0.3"];h2 = Labeled[   Plot[{f[0.5, 20, 1, k], f[0.5, 1, 20, k], f[0.5, 20, 20, k]}, {k,      0, 10}, PlotStyle -> {Blue, Red, Green},     AxesLabel -> {"k value", Increasing Speed      }, PlotLegends ->      Placed[{"\[Lambda]r>\[Lambda]s", "\[Lambda]r<\[Lambda]s",        "\[Lambda]r=\[Lambda]s"}, Above]], "\[Alpha]=0.5"];h3 = Labeled[   Plot[{f[0.8, 20, 1, k], f[0.8, 1, 20, k], f[0.8, 20, 20, k]}, {k,      0, 10}, PlotStyle -> {Blue, Red, Green},     AxesLabel -> {"k value", Increasing Speed      }, PlotLegends ->      Placed[{"\[Lambda]r>\[Lambda]s", "\[Lambda]r<\[Lambda]s",        "\[Lambda]r=\[Lambda]s"}, Above]], "\[Alpha]=0.8"];h4 = Labeled[   Plot[{f[\[Alpha], 20, 1, 10], f[\[Alpha], 1, 20, 10],      f[\[Alpha], 20, 20, 10]}, {\[Alpha], 0, 1},     PlotStyle -> {Blue, Red, Green},     AxesLabel -> {"\[Alpha] value", Increasing Speed      }, PlotLegends ->      Placed[{"\[Lambda]r>\[Lambda]s", "\[Lambda]r<\[Lambda]s",        "\[Lambda]r=\[Lambda]s"}, Above]], "k=100"];GraphicsGrid[{{h1, h2}, {h3, h4}}]In this groups of graphics, there are two graphics in the first row and two in the second row, but the space between the rows are so large, I wonder if there is any solution to solve this problem. Furthermore, how to align the two graphics in the second row? Thank you very much.
2 Replies
Sort By:
Posted 10 years ago
 Check "Row Spacings on Mathematics Documentation.
Posted 10 years ago
 Thank you, but it seems doesn't work.