Update pitfwaed.R

Fixed reference in line 72 (yr to year)