Update aatams.R