updating last two R Files