R programming assignment committed