Added the VectorizedTo3DArray.R file which contains the function VectorizedTo3DArray(df,ExEm).