create test.R file