How to do union that results to a SpatialPolygonDataFrame in R?

[المشرف العام]

I have the following code

coastline