Hi…Have a good day… @thho Thank you very much for sharing your work in Subseting .csv file created from TS Plot. I have an error like this when trying to execute command in R studio.
R - Script
###########################
###subset ts plot export###
###########################
library(sp)
library(rgdal)
library(rgeos)
#read subsetpolygon
roi <- readOGR("/home/cresos/TOKYOSENTINEL1/ROI/ROI.kml")
#read exported .csv
pnts <- read.csv("/home/cresos/TOKYOSENTINEL1/DESCENDING/SUBSET2/STAMPSEXPORT/INSAR_20190714/tokyosentineldescendingsubset2.csv")
#create spatial object
lon <- pnts$export_res_.1[2:nrow(pnts)]
lat <- pnts$export_res_.2[2:nrow(pnts)]
loc <- data.frame(lon, lat)
pnts.geo <- SpatialPointsDataFrame(loc, pnts[2:nrow(pnts), ],
proj4string = CRS("+proj=longlat +ellps=WGS84 +datum=WGS84 +no_defs"))
#spatial subset
pnts.sub <- pnts.geo[roi, ]
#create table from spatial subset
sub.csv <- rbind(pnts[1, ], pnts.sub@data)
#export csv to StaMPS-Visualizer application
#adapt path to your machine
write.table(sub.csv, file = “/home/cresos/stamps_tsexport_subset_descending.csv”,
row.names = F, col.names = T, sep = “,”)
Response
###########################
###subset ts plot export###
###########################
library(sp)
library(rgdal)
library(rgeos)
#read subsetpolygon
roi <- readOGR("/home/cresos/TOKYOSENTINEL1/ROI/ROI.kml")
OGR data source with driver: KML
Source: “/home/cresos/TOKYOSENTINEL1/ROI/ROI.kml”, layer: “ROI.kml”
with 1 features
It has 2 fields
Warning message:
In readOGR("/home/cresos/TOKYOSENTINEL1/ROI/ROI.kml") :
Z-dimension discarded
#read exported .csv
pnts <- read.csv("/home/cresos/TOKYOSENTINEL1/DESCENDING/SUBSET2/STAMPSEXPORT/INSAR_20190714/tokyosentineldescendingsubset2.csv")
#create spatial object
lon <- pnts$export_res_.1[2:nrow(pnts)]
lat <- pnts$export_res_.2[2:nrow(pnts)]
loc <- data.frame(lon, lat)
pnts.geo <- SpatialPointsDataFrame(loc, pnts[2:nrow(pnts), ],
proj4string = CRS("+proj=longlat +ellps=WGS84 +datum=WGS84 +no_defs"))
Error in .local(obj, …) :
cannot derive coordinates from non-numeric matrix
#spatial subset
pnts.sub <- pnts.geo[roi, ]
Error: object ‘pnts.geo’ not found
#create table from spatial subset
sub.csv <- rbind(pnts[1, ], pnts.sub@data)
Error in rbind(pnts[1, ], pnts.sub@data) : object ‘pnts.sub’ not found
#export csv to StaMPS-Visualizer application
#adapt path to your machine
write.table(sub.csv, file = “/home/cresos/stamps_tsexport_subset_descending.csv”,
row.names = F, col.names = T, sep = “,”)
Error in is.data.frame(x) : object ‘sub.csv’ not found
I need your advice
Thank you in advance
Best Regards
Badrul