Converter tabela de coordenadas em arquivo de forma usando R

Eu tenho um conjunto de dados de coordenadas de ponto na zona 48 do UTM.

  x           y       
615028.3  2261614    
615016.3  2261635    
614994.4  2261652    

O arquivo CSVaqui.

Gostaria de carregar o CSV e criar shapefile usando R. Meu código é:

library(maptools)
library(rgdal)
library(sp)

    UTMcoor=read.csv(file="https://dl.dropboxusercontent.com/u/549234/s1.csv")
    coordinates(UTMcoor)=~X+Y
    proj4string(UTMcoor)=CRS("++proj=utm +zone=48") # set it to UTM
    LLcoor<-spTransform(UTMcoor,CRS("+proj=longlat")) #set it to Lat Long
    plot(LLcoor)
    points(LLcoor$X,LLcoor$Y,pch=19,col="blue",cex=0.8) #to test if coordinate can be plot as point map
    writeOGR(UTMcoor, dsn="c:/todel" ,layer="tsb",driver="ESRI Shapefile")
    writeSpatialShape("LLcoor","test")

No último comando (writeSpatialShape) R, dê o seguinte erro:

Error in writeSpatialShape("LL2", "test") : 
  x is acharacterobject, not a compatible Spatial*DataFrame

Enquanto eu leio o LLcoor no console, parece que ele já é um DataFrame espacial. Gravar arquivo de forma usando writeOGR (pacote RGdal) também gera erro semelhante. Qualquer dica é muito apreciada.

questionAnswers(2)

yourAnswerToTheQuestion