Create r-test.R