solve in R the equation

[Guest]

[tex]\sqrt{(xy+x+y)^2+xy+x+y+7}=\sqrt{x^2y^2-xy+1}+\sqrt{y^2+y+1}+\sqrt{x^2+x+1}[/tex]