modify stress test case add rm(list=ls()) to remove temp variable in
r,reduce memory