Create createAE.R