I have this shapefile which you can download from
CodePudding user response:
Every row seems to be that same shape, but some have a little bit cut out. So your plot is showing all of them on top of each other. Picking some at random:
par(mfrow=c(2,2))
plot(subs$geometry[1])
plot(subs$geometry[29])
plot(subs$geometry[129])
plot(subs$geometry[329])
If that's not what you expect then go back to whoever you got the data from and take it up with them, if you created it and its not what you expect then you need to fixup your processing pipeline.