Minor changes in plot4

ser par("mar") to default