CHANGED:using TempDirectory with clearWorkspace function call,adding column to 4 while using A4 typeset