Create contour.R