fits.R now plots max and mean