adding in the send/recv of the r vectors