first commit R program