Sea formula_17 el vector de "R" a "P" y sean