Customizing the title of a set of plots

[#1]

I currently have a script to produce the following plot. The call that finally produces it looks like this:

chart = Bivariate( Y( :Log10 Reads , :Log10 Writes ), X( :Bin ), Nonpar Density,

  Send To Report(

  Dispatch( {}, "Bivar Plot", Framebox, {Frame Size(plotWidth, plotHeight)}),

  Dispatch({}, "1", ScaleBox, {Format("Best", 10), Min(xMin), Max(xMax), Inc(xInc),

                                 Minor Ticks(1), Rotated Labels("Horizontal")}),

  Dispatch({}, "2", ScaleBox, {Format("Best", 10), Min(yMin), Max(yMax), Inc(yInc),

                                 Minor Ticks(1), Rotated Labels("Horizontal")})

  )

);

My question is simply, how do I programmatically change the title of the grouping of bivariate plots (circled below) to something customized and more descriptive?

[#2 · Accepted solution]

If the report is the top open report this should work:

Current Report()[Outline Box( 1 )] << set title( "my plots" )