Udpated to fix some reference errors.
 Changes to be committed:
	modified:   plot1.R