power-model.R: added cross-validation of model