Simplified Plot1.R