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

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.

Check "Row Spacings on Mathematics Documentation.

Thank you, but it seems doesn’t work.