【グラフ】X軸ラベルが切れてしまう現象について

Code:
{import * from CURL.GUI.CHARTS}

{import * from CHARTS-DOC,

    location = "../docstring-support/gui/charts-doc.scurl"

}



{let chart:LayeredChart =

    {LayeredChart

        {BarLayer

            {ChartDataSeries sample-records, "Age"},

            x-axis-data = {ChartDataSeries sample-records, "Name"},

            {DataSeriesColorPair

                {ChartDataSeries sample-records, "Age"},

                FillPattern.silver

            }

        },

        {LineLayer

            {ChartDataSeries sample-records, "Age"},

            legend-enabled? = false

        },

        {ScatterLayer

            {ChartDataSeries sample-records, "Age"},

            {DataSeriesColorPair

                {ChartDataSeries sample-records, "Age"},

                FillPattern.silver

            }

        }

    }

}

{let cb:ChartBox = {ChartBox

                             height = {make-elastic},

                             chart

                         }

}



{let sc:SpinControl = {SpinControl

                          domain = 

                              {StandardIntDomain

                                  default-value = 1000,

                                  min-allowable = 0,

                                  max-allowable = 10000

                              },

                          step = 1,

                          {on ValueChanged at sc:SpinControl do

                              set cb.width = sc.value * 0.01cm

                          }

                      }

}

{VBox

    width = 15cm,

    height = 15cm,

    sc,

    cb

}