Started createISDobject.R file.