# NOT RUN {
# }
# NOT RUN {
pkgReset();
system.time(rastGFT92 <- getCtryNlData(ctryCode = "NGA",
admLevel = "lowest", nlTypes = "OLS.Y", nlPeriods = "1992",
removeGasFlares = F, ignoreMissing=FALSE, nlStats = list("myfun")))
pkgOptions(extractMethod="gdal",cropMaskMethod="gdal");
system.time(gdalGFT92 <- getCtryNlData(ctryCode = "NGA",
admLevel = "lowest", nlTypes = "OLS.Y", nlPeriods = "1992",
removeGasFlares = F, ignoreMissing=FALSE, nlStats="myfun"))
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab