Quick change in test.R

Testing change in R