Resultant[271818611107 - 43*(8265 - 7889*r + 343*r^2)*y + y^2, -1 - 2 r + r^2 + r^3,r]