Create Plot1 and R files