update test.R