Solve for R P=I^2R