if (FALSE) {
library(SpatGRID)
lon_list<-c(78,78,79,79,78)
lat_list<-c(20,21,21,20,20)
hemisphere <- 'north'
outputShape <- 'C:\\path\\to\\your\\data\\grid.shp'
interval <- 1000
Spatial_GRID <- SpatialGridR(lon_list, lat_list, hemisphere, interval, outputShape)
}
Run the code above in your browser using DataLab