> library(geosphere)
> library(sp)
> library(maptools)
> library(spatstat)
#どれが必要なライブラリなのかわからん。> pnt_xy <- cbind(StrokePoints$X,StrokePoints$Y)
> plot(pnt_xy)
> pnt_sp <- SpatialPoints(data.frame(StrokePoints$X,StrokePoints$Y))
> bbox(pnt_sp)
> bbox(pnt_sp)
> pnt_spdf <- SpatialPointsDataFrame(pnt_xy, StrokePoints)
> head(pnt_spdf)
> head(pnt_spdf)
> plot(pnt_spdf)
なんだねこれは |
0 件のコメント:
コメントを投稿