change the test01.R file to add env