# NOT RUN {
require(maptools)
file <- system.file("extdata", "example.shp", package = "cleangeo")
sp <- readShapePoly(file)
report <- clgeo_CollectionReport(sp)
nv <- clgeo_SuspiciousFeatures(report)
# }
Run the code above in your browser using DataLab