12-2-2

updated r file