1 of 2

change imagesize of the “ComparisonPlot”

I work with the Predict function to train a neuralnetwork.

datnn =   Predict[dattrain, Method -> "NeuralNetwork",  PerformanceGoal -> "Quality"];
NNCM = PredictorMeasurements[datnn, dattest];
CP = NNCM["ComparisonPlot"]

One of the outputs is the ComparisonPlot

enter image description here

I want to combine this plot with one other plot, for example :

Row[{CP, 
  ListLinePlot[date[[All, {1, 3}]],  ImageSize -> Large], Frame -> True]

The Imagesize of the ComparisonPlot is different from the otrher plot. For that reason I want to change the imageformat of the ComparisonPlot. Who has a suggestion to do this?