Create test001.R