Create NEI3.R