R/areaPoly.R

Defines functions areaPoly

Documented in areaPoly

areaPoly<-function(sp.object=NULL){
	### Check to make sure the object is sp-class
		if(class(sp.object)[1]!="SpatialPolygonsDataFrame")
			cat("Incompatible class!")
	area<-sapply(slot(sp.object, "polygons"), slot,"area")
	area
	}
zalmquist/UScensus2010 documentation built on May 28, 2017, 11:40 a.m.