Reheat Factor In R Programming