fixed wrong parameter in R grow and predict test