Displaying 1 result from an estimated 1 matches for "xymax".
Did you mean:
ymax
2006 Nov 30
2
*** caught segfault *** error
...vertices <- list()
> for(i in 1:ndistricts){
+ vertices[[i]] <- districts.shp$shp$shp[[i]]$points
+ }
>
> districts.map <- list(codigo=keys, vertices=vertices)#,
nombre=wardnames)
>
> xymin <- apply(t(sapply(districts.map$vertices, apply, 2, min)),
2, min)
> xymax <- apply(t(sapply(districts.map$vertices, apply, 2, max)),
2, max)
> corners <- expand.grid(xymin, xymax)
>
> # Plotting the corners and then adding polygons one by one.
> par(pty="s")
> plot(rbind(xymin, xymax), type="n")
> for (i in 1:ndistricts...