fix ensemble.R