improve runall.R