change dimple.R to test-speedimprove dimple.R