Fixed a typo in par(mfrow)