Fixed sstFunctions.R