Create complete.R

R prog assignment 1.2