使用R中的WKT几何体字段在数据帧中打印点

我试图用WKT字段在数据框中绘制点

library(rgeos)
library(rgdal)

> head(df)
  id_pixel     id_lote                                        geo
1  1000013    10000131  POINT(-6421630.0792544 -3100141.21446612)
2  1000013    10000132 POINT(-6421398.42289614 -3100141.21446612)
3  1002031 10020311447 POINT(-6423017.27939664 -3120987.67242424)
4  1002031 10020311449 POINT(-6422093.39197093 -3121221.94306813)
5  1002031 10020311450 POINT(-6422785.09835309 -3121218.46519762)
6  6020361      602036           POINT(-5550130.276 -3814563.524)
> dim(df)
[1] 790381      3

我使用rgeos的readWKT在坐标中转换WKT，然后绘制点

point.sp <- SpatialPointsDataFrame(readWKT(df[1,3]), data=df[1,])

for (n in 2:dim(df)[[1]]) {
  point.sp <- rbind(point.sp, 
                    SpatialPointsDataFrame(readWKT(df[n,3]),data=df[n,]))
  print(n)
}

第三，当我绘制点时，我不能操纵点的类型或大小。我收到这个警告信息：

plot(point.sp, type="p" , lwd= 0.25,axes = 1,  col='orange')


Warning messages:
1: In axis(1, ...) : graphical parameter "type" is obsolete
2: In axis(2, ...) : graphical parameter "type" is obsolete
3: In title(...) : graphical parameter "type" is obsolete

所以也许我应该使用一种完全不同的方法，或者我可以通过一些调整使它工作吗

谢谢！对不起，我的英语很好

plot(point.sp, type="p" , lwd= 0.25,axes = 1,  col='orange')


Warning messages:
1: In axis(1, ...) : graphical parameter "type" is obsolete
2: In axis(2, ...) : graphical parameter "type" is obsolete
3: In title(...) : graphical parameter "type" is obsolete