¿Eliminar la intersección de un polígono de otro usando R?

Estoy tratando de eliminar la intersección de Poly2 en Poly1. Debajo están los coords de los 2 polígonos. > coords1 [,1] [,2] [1,] 992.0161 7462.531 [2,] 950.1962 7413.532 [3,] 902.3632 7421.207 [4,] 706.1985 7472.378 [5,] 654.0139 7711.760 [6,] 657.5960 7726.950 [7,] 786.2667 7844.380...