split up R week