Create utils.R

utils for running simulation