Create PeerAssignment.R