Update CreateGlobalGroups.R