Edward Cai first draft initialization added to Coded.R