doesn't write shapefile in R

Question

I joined \'csv\' data to shapefile data by R. File join was successful, but I can\'t save shapefile. I used the following code

library(sp)
library(rgdal)
data