您可以使用来自GADM的数据,其中包含不同级别的行政区划中的shapefile,因此我认为也是2级的区级别.您可以使用下面的脚本直接加载数据,代码从这里获取.
所以在你的情况下你会运行:
IND<-getCountries("IND",level=2)
Run Code Online (Sandbox Code Playgroud)
只是为了检查,绘制数据:
plot(ind)
Run Code Online (Sandbox Code Playgroud)

或者,您可以使用GAUL数据并使用加载shapefile maptools.
获取数据的代码.
# Load required libraries
library(sp)
# Load file from GADM
# Specify the countries for fileName using ISO3C
# like "AFG" for Afghanistan.
# "level" specifies adminsitrative level.
loadGADM<-function(fileName,level=0,...){
load(url(paste("http://gadm.org/data/rda/",fileName,"_adm",level,".RData",sep = "")))
gadm
}
# Add prefix (ISO3C code) to shapefile.
changeGADMPrefix<-function(GADM, prefix) {
GADM <- spChFIDs(GADM, paste(prefix, row.names(GADM), sep = "_"))
GADM
}
# Load file and change prefix
loadChangePrefix<-function (fileName, level = 0, ...) {
theFile <- loadGADM(fileName, level)
theFile <- changeGADMPrefix(theFile, fileName)
theFile
}
# Apply all the functions:
getCountries <- function (fileNames, level = 0, ...) {
polygon <- sapply(fileNames, loadChangePrefix, level)
polyMap <- do.call("rbind", polygon)
polyMap
}
Run Code Online (Sandbox Code Playgroud)