Create Social Creativity_CORE.R