R version 4.0.2 (2020-06-22) -- "Taking Off Again"
Copyright (C) 2020 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> options("rgdal_show_exportToProj4_warnings"="none")
> library(sp)
> xy = expand.grid(x = 1:4, y = 1:4)
> xy.sp = SpatialPoints(xy)
> gridded(xy.sp) = T
> # deselect 1 row and 2 col:
> tst = xy.sp[-c(2,6,10,14,9,11,12)]
> tst
Object of class SpatialPixels
Grid topology:
cellcentre.offset cellsize cells.dim
x 1 1 4
y 1 1 4
SpatialPoints:
x y
[1,] 1 1
[2,] 3 1
[3,] 4 1
[4,] 1 2
[5,] 3 2
[6,] 4 2
[7,] 1 4
[8,] 3 4
[9,] 4 4
Coordinate Reference System (CRS) arguments: NA
> # convert to SpatialPixelsDataFrame:
> tst = SpatialPixelsDataFrame(tst, data.frame(xx = rnorm(9)))
> spplot(tst["xx"], main = "empty row + col")
>
> proc.time()
user system elapsed
0.417 0.028 0.442
Generated by dwww version 1.15 on Sun Jun 30 10:00:49 CEST 2024.