Fail when combining ggplots with plots produced from another package: why and how to succeed?

Question

I want to combine two ggplots with two calibration plots made in riskRegression.

I tried many approaches, e.g. par(mfrow)