Added function multiplot.R for comparison of the 4 parent models