Create run_analysi.R