Create NEI1.R