Second Part of Coding R